Well
This is actually turning out to be a nice problem.
Well the only suggestion which I could find is when you look at how
Borland did it with the TLabel.repaint, in there they used the method
QWidget_setUpdatesEnabled(Handle, False);
When I played around with it
Uses
Qt.pas
procedure TForm1.Button1Click(Sender: TObject);
var
liK : integer;
begin
QWidget_setUpdatesEnabled(Label1.Handle, False);
try
for liK := 1 to 20000 do
begin
Label1.caption := IntToStr(liK);
end;
finally
QWidget_setUpdatesEnabled(Label1.Handle, True);
Label1.Repaint;
end;
end;
For some bizarre reason it keeps updating the component in intervals.
By the looks of it at least the flickering is gone, so I do not know if
this is the most elegant solution, please let me know if you have found
out more about this? Or even if this helps
Cheers
Johan Fourie
NOTICE: Please note that this eMail, and the contents thereof, is subject to
the standard arivia.kom email disclaimer which may be found at:
http://www.arivia.co.za/internet/disclaimer.htm. If you cannot access the
disclaimer through the URL attached, and you wish to receive a copy thereof,
please send an eMail to [EMAIL PROTECTED] or call (011) 233-0800. You will
receive the disclaimer by return email or fax.
_______________________________________________
Delphi mailing list -> [email protected]
http://www.elists.org/mailman/listinfo/delphi
