Fehler: "deaktiviertes oder unsichtbares Fenster ..."

[gfjs]

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:

Delphi-Quellcode:

Enabled := false;

Kann mir das jemand erklären?

[DelphiKlaus]

Hallo,

hast Du das Editfeld disabled? Darauf deutet jedenfalls die Fehlermeldung hin.

Ich würde auch die Zuweisungen an das Editfeld nicht im FormCreate, sondern im Formshow vornehmen, da Du dann sicher sein kannst, dass alle Objekte auch kreiert sind.

MfG

Klaus

[gfjs]

@ DelphiKlaus

Die Verwirrung wird noch größer!

Das Edit ist nicht disabled. Ich habe jetzt die Zuweisung

Delphi-Quellcode:

EdProg.Text := EdStartText;

in FormShow verlegt mit der Folge, dass die Fehlermeldung schon beim Programmstart kommt.

D.h. Der Fehler tritt im FormShow auf, wenn dort die o.a. Zuweisung erfolgt. Erfolgt diese Zuweisung in FormCreate, tritt der Fehler erst auf, wenn außerhalb von FormCreate diese Zuweisung erfolgt.

Wird aber die Anweisung

Delphi-Quellcode:

Enabled := false

in meinem ersten Post gestrichen, läuft das ganze ohne Fehlermeldung.

:bouncing4: Fehler gefunden:

Ich hatte an anderer Stelle die Anweisung:

Delphi-Quellcode:

    MemExeFile.SetFocus;

hatte aber übersehen, dass vorher das Memo disabled war. Folge: Über eine Stunde gesucht.

Trotzdem Dank für Deine Bemühung.

Gruß Jürgen