On "AfterShow" ?

[richard_boderich]

@ sniper_w

erstma thx für deine antwort.
muss ich denn sonst noch irgendwas beachten, wenn ich diese Routine einsetze. die automatische
neuzeichnung bei minimieren oder verkleinern des forms funktioniert also trozdem ja ?
außerdem will ichs nur einmal ausführen. wuerd das so machen?

Delphi-Quellcode:

procedure TMyForm.Paint; 
begin 
  inherited Paint; 
  if not fPainted then begin 
    fPainted := True; 
    if hastenichgesehn=true then AfterShow; 
  end; 
end;