In das "OnPaint" eines TEdits einklinken

[Sharky]

Hai Marco,

danke für den Tipp. Jetzt scheint alles so zu laufen wie ich es möchte.

Ich habe dein Visible True/False durch diesen Code ersetzt ung es geht:

Delphi-Quellcode:

procedure TShExTntEdit.DoExit;
begin
  inherited DoExit;
  Inherited Perform(CM_RECREATEWND, 0, 0);
end;