Memo

[Alallart]

Zitat von DomPerle:

Betrifft Memo: Wie kann ich die Farbe eines Textes beibehalten, auch wenn ENABLED = FALSE gesetzt wurde.

Ich habe gerade vor zwei Minuten eine Idee gehabt und hab sie ausprobiert. Es funktioniert, auch ohne Panel.

Setz einfach in OnEnter-Ereignis dein Memo bei Enabled auf False, und bei OnExit-Ereignis Enabled auf True. Dadurch wird das Memo abgeschaltet wenn es den Fokus erhält, lehnt es ab, und schaltet sich wieder ein wenn es den Fokus verloren hat. Im Grunde merkt man die Aktion noch nicht mal. Ein Zirkelschluss ergibt sich daraus auch nicht, habe es geprüft. Und die Scrollbalken funktionieren weiter.

Delphi-Quellcode:

procedure TForm1.Memo1Enter(Sender: TObject);
begin
  Memo1.Enabled := False;
end;

procedure TForm1.Memo1Exit(Sender: TObject);
begin
  Memo1.Enabled := True;
end;

[himitsu]

Hmmm, wenn es Enabled:=False wird, dann verliert es den Fokus und es wird sofort wieder OnExit ausgelöst.