Hallo!
Im Interface meiner
Unit habe ich eine Konstante deklariert:
Delphi-Quellcode:
const
EdStartText : string = 'Bezeichnung eingeben oder Eintrag markieren';
In FormCreate weise ich einem Edit den Text zu:
Delphi-Quellcode:
with EdProg do
begin
ParentFont := true;
Text := EdStartText;
Left := 10;
Top := 10;
Width := 300;
end;
Wann immer ich außerhalb von FormCreate die Konstante zuweise, z.B.
Delphi-Quellcode:
procedure TFEdit.BtnCancelClick(Sender: TObject);
begin
EdProg.Text := EdStartText;
end;
erhalte ich die Fehlermeldung:
Zitat:
Deaktiviertes oder unsichtbares Fenster kann den Fokus nicht erhalten.
Wer kann mir da weiterhelfen?
Vielen Dank und Grüße aus München
Jürgen
Ich habe jetzt festgestellt, dass der Fehler aus diesem Block in FormCreate stammt:
Delphi-Quellcode:
// MemExeFile
with MemExeFile do
begin
Clear;
Left := 10;
Height := EdProg.Height*3;
Top := LbExeFile.Top + LbExeFile.Height + 5;
Width := EdProg.Width;
Enabled := false;
end;
und zwar von der Anweisung:
Enabled := false;
Kann mir das jemand erklären?