Otra forma de solucionar el problema adaptando algo de código que encontré aquí
http://stackoverflow.com/questions/2...form-is-active
Cita:
procedure TFormPrincipal.OnDoIdle(Sender: TObject; var Done: Boolean);
begin
Realign;
end;
procedure TFormPrincipal.FormCreate(Sender: TObject);
begin
Application.OnIdle:=OnDoIdle;
end;
|