Bei Listbox z.B. kann ich mit BeginUpdate und EndUpdate einen Bildschirmaufbau verhindern
Meine Frage an auch wie kann mann das bei einen Panel od. Form
Danke für eure Anworten Harald

Hallo Harald,

du kannst die Funktion LockWindowUpdate einsetzen:

markieren

Delphi-Quellcode:

LockWindowUpdate(Form.Handle);
try
  // hier Zeichenroutinen
finally
  LockWindowUpdate(0);
end;

Beachte aber bitte das Kleingedruckte in der Beschreibung der Funktion. So kann man z.B. nicht zwei Fenster gleichzeitig sperren.

Gruß Hawkeye

Hey there

Folgende Methode hat in meinen Tests mit MDI-Childs besser als LockWindowUpdate funktioniert:

zusammenfalten · markieren

Delphi-Quellcode:

procedure LockWindow(const Handle: HWND);
begin
  SendMessage(Handle, WM_SETREDRAW, 0, 0);
end;

procedure UnlockWindow(const Handle: HWND);
begin
  SendMessage(Handle, WM_SETREDRAW, 1, 0);
  RedrawWindow(Handle, nil, 0,
    RDW_ERASE or RDW_FRAME or RDW_INVALIDATE or RDW_ALLCHILDREN);
end;

Gruss
Shaman

Danke für die schnellen Anworten werde so bald ich Zeit habe eure Anworten testen und einsetzen Harald

Toll, habe es schon getestet bei meiner Anwendung und es hat genau das gemacht was ich suchte, Danke

Ich sag hier auch mal einfach Danke !

Die beiden Funktionen helfen bei MDI sehr