Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Macci,
2. Jun 2008
Also, so sollte es defintiv gehen:
Füge diese Code irgendwo am Anfang ein.
procedure InvalidateAll(Control:TWinControl);
var i:integer;
begin
InvalidateRect(Control.Handle,nil,True);
for i:=0 to Control.ControlCount - 1 do
if Control.Controls is TWinControl then
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Macci,
1. Jun 2008
Im Grunde genau wie deine alte Lösung, nur dass sich die Form dabei NICHT unsauber um einen Pixel verschiebt.
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Macci,
1. Jun 2008
Versuchs mal mit
InvalidateRect
(siehe Hilfe)