перемещение невидимой формы

[the_beginer]

доброго времени суток!

может сможете объяснить почему вот этот код перемещает форму

Код: Выделить всё

procedure TForm1.Button1Click(Sender: TObject);такой трабл,
begin
  form1.visible := false;
  form1.visible := true;
  form1.Left:= form1.Left + 100;
end;  

а вот этот код нет:

Код: Выделить всё

procedure TForm1.Button1Click(Sender: TObject);
begin
  form1.visible := false;
  form1.Left:= form1.Left + 100;  
  form1.visible := true;

end;  

и как с этим бороться?

[Troublemaker]

the_beginer Э-э, уважаемый, а версии лазаря, фпц и ОС нам телепаты сообщат?

[ViTality]

по крайней мере у меня под ввиндой с лазарем/фпц из подписи все норм

[the_beginer]

the_beginer Э-э, уважаемый, а версии лазаря, фпц и ОС нам телепаты сообщат?

Верное замечание, виноват, исправился, см. подпись
Однако вопрос остается открытым