Zugriffsverletzung beim anzeigen eines Forms

[Akut-Programming]

Huhu :hi:

Wenn meine Anwendung startet, wird das Hauptform zuerst nicht angezeigt, sondern es erscheint ein Logindialog für die Anwendung. Wenn das Loginfenster erstellt wird, wird folgender Code aufgerufen:

Delphi-Quellcode:

procedure TfrmLogin.FormCreate(Sender: TObject);
var
   ini: TIniFile;
begin
     if FileExists(OwnFilesPath+'\AMS\database.ini')
     then begin
          ini:=TIniFile.Create(OwnFilesPath+'\AMS\database.ini');
          try
             with frmMain do begin
                  varUserID:=ini.ReadString('DBSettings', 'UserID', '');
                  varDSN:=ini.ReadString('DBSettings', 'DSN', '');
                  varDB:=ini.ReadString('DBSettings', 'DB', '');
                  varServer:=ini.ReadString('DBSettings', 'Server', '');
                  varPassword:=ini.ReadString('DBSettings', 'Password', '');
                  varPort:=ini.ReadString('DBSettings', 'Port', '');
                  MySQLCS:='Provider=MSDASQL.1;Persist Security Info=False;User ID='+varUserID+';Data Source='+varDSN+';Extended Properties="DSN='+varDSN+';DESC=MySQL ODBC 3.51 Driver DSN;DATABASE='+varDB+';SERVER='+varServer+';UID='+varUserID+';PASSWORD='+varPassword+';PORT='+varPort+';SOCKET=;OPTION=3;STMT=;"';
                  ADOConnection1.ConnectionString:=MySQLCS;
                  ADOConnection1.Connected:=true;
             end;
          finally
                 ini.Free;
          end;
     end;
     frmLogin.ShowModal;
     CloseAction:=caNone;
end;

Anschließend will ich das Fenster zum angeben der MySQL-DB Settings für meine Anwendung anzeigen lassen. Dazu habe ich ein Label aufs Loginform gepackt, wo beim drauf klicken dieser Code ausgeführt wird:

Delphi-Quellcode:

procedure TfrmLogin.Label3Click(Sender: TObject);
begin
     frmMySQLSettings.Show;
end;

Klicke ich da drauf, kommt es im Code des OnClick des Labels zu einer Zugriffsverletzung. :gruebel: Kann mir jemand weiterhelfen?? - Ich weiß nich mehr weiter.:wall:

Gruß,
Sascha

[alcaeus]

Hi Sascha,

wurde frmMySQLSettings auch erstellt?

Greetz
alcaeus

[Alex_ITA01]

vielleicht habe ich das jetzt auch falsch verstanden... aber ist denn die frmMySQLSettings-Form schon vorhanden (create) wenn du auf das label klickst?Ansonsten versuche vorher mal .create
Mfg Alex

[Alex_ITA01]

zu spät :wall:
:-)

[Akut-Programming]

Hoi alcaeus,

hmm das ist ne gute Frage :gruebel:. Ehrlichgesagt weiß ich nicht obs schon erstellt ist. :roll: Ich würde jetzt dummerweise mal schätzen, das es noch nicht erstellt ist. Wenn ich frmMySQLSettings.Create angebe, will er parameter haben. :wiejetzt: - Hab ich ne andere Möglichkeit das Form vor dem eigentlichen Logindialog erstellen zulassen??

Gruß,
Sascha

[alcaeus]

Hi Sascha,

sieh mal in den Projektoptionen nach. Dort gibt es ein Feld mit allen Forms, wo du das MainForm einstellen kannst. Dort kannst du auch angeben, welche Forms automatisch erstellt werden sollen.
Zu den Projektoptionen: Strg+Shift+F11, dann die Registerkarte "Formulare".

Greetz
alcaeus

[Akut-Programming]

:thumb: Ich danke dir alcaeus!! *DemAlcaeusErstmaNBierchenGibt* :cheers: Wie einfach das doch eigentlich ging.. :roll:

[Alex_ITA01]

als parameter kannst du (Application) übergeben.Das reicht vollkommen aus.
MFG Alex

[Akut-Programming]

Hi Alex,

auch dir THX für deine Hilfe. Habs jetze hinbekommen!!

Gruß,