Vielen Vielen Dank haentschman!
Ich hab meinen Code noch etwas angepasst und mit dem Guide und deinen Tipps/Hilfe Lesbarer gemacht.
Das hat mir extrem geholfen auch nochmal etwas mehr Verständnis dafür zu bekommen.
Danke das du dir die Zeit genommen hast
Eine Frage hätte ich noch, Ich hab ja die Procedure von dem Edit Feld mit der Passwort Eingabe. Ich steh grade etwas auf dem Schlauch und frage mich ob ich das noch etwas Sauberer schreiben könnte da ich mehrere Buttons erst nach Eingabe das Passwortes sichtbar machen möchte.
Code:
procedure TForm1.EditPasswortChange(Sender: TObject);
begin
EditPasswort.PasswordChar:= #0;
EditPasswort.PasswordChar:= '*';
if (EditPasswort.Text ='test123') then
BtnMinimieren.Visible:=True
else
BtnMinimieren.Visible:=False;
if (EditPasswort.Text ='test123') then
BtnSchliessen.Visible:=True
else
BtnSchliessen.Visible:=False;
if (EditPasswort.Text ='test123') then
BtnNewDb.Visible:=True
else
BtnNewDb.Visible:=False;
end;
MFG
David