Invalidate()

Invalidate() – Neuzeichnen eines Controls auslösen

Verwenden Sie Invalidate, wenn das gesamte Steuerelement neu gezeichnet werden muß. Wenn mehrere Bereiche innerhalb des Steuerelements neu aufgebaut werden müssen, zeichnet Invalidate das gesamte Fenster ohne Bildschirmflackern neu.
Es wirkt sich auch nicht negativ auf die Ausführungsgeschwindigkeit aus, wenn Invalidate vor dem Neuzeichnen des Steuerelements mehrere Male aufgerufen wird.

Parameter	Beschreibung
aControl:O	Control

Rückgabewert

keiner

Beispiel

CODE

| oForm, oBtnC, oEdit |

function DoOnBtnCClick(sender)
   Invalidate(oEdit),
end,

oForm             := CreateObject('TForm'),
oForm.BorderStyle := bsSingle,
oForm.Width       := 200,
oForm.Height      := 400,
oForm.Name        := 'Form',
oForm.Caption     := 'CreateObject-Test',
oForm.Position    := poScreenCenter,

oBtnC         := CreateObject('TButton', 'BtnC', oform, oForm),
oBtnC.Width   := 150,
oBtnC.Height  := 20,

oBtnC.Top     := 20,
oBtnC.Left    := 20,

oEdit      := CreateObject('TBeEdit', 'Edit', oBtnC, oForm),
oEdit.Top  := 100,
oEdit.Left := 20,
oEdit.Text := 'Hello World',

AssignEvent(oBtnC, 'OnClick', 'DoOnBtnCClick'),
ShowModal(oForm),