Einzelnen Beitrag anzeigen

Benutzerbild von Sharky
Sharky

Registriert seit: 29. Mai 2002
Ort: Frankfurt
8.251 Beiträge
 
Delphi 2006 Professional
 
#1

In das "OnPaint" eines TEdits einklinken

  Alt 18. Jan 2006, 11:29
Hai ihr,

bei meiner letzen Frage hat Bernhard mir ja den Tipp gegeben mich in das OnPaint des TEdits einzuklinken.

Jetzt gibt es das aber dort nicht. Wenn ich versuche mich so in die Paint-Message inzuhängen wird diese natürlich durch das Zeichnen meines Rahmens immer wieder ausgelösst.

Delphi-Quellcode:
procedure TShExEdit.WMPaint(var Message: TWMPaint);
begin
  inherited;
  FUpdateColor; // Hier wird ein Rahmen gezeichnet
end;
Wie muss ich denn da ansetzen um mir im Paint des TEdits einen Rahmen um diesen zu zeichnen?
Stephan B.
"Lasst den Gänsen ihre Füßchen"
  Mit Zitat antworten Zitat