изменение позиции form1

[mosq]

не пойму.. при нажатии на кнопку делаю:

form1.left:=100;
form1.top:=100;

а форма как была на своем месте, так и остается.
или надо еще какую функцию обновления формы вызывать?

[mihali4]

Где вы сей волшебный код вызываете, в каком-таком событии ?
А что у вас в Position формы стоит ? Небось - poScreenCenter ? Или poDesktopCenter ?
А какие события для формы определены вами ?
Если ничего из этого... то это глюк - перезапустите Дельфи.
А может, она у вас там и стоит - на сотенках ? Вы ее сдвиньте куда-нибудь вручную сначала. Двигается ?

[mosq]

Где вы сей волшебный код вызываете, в каком-таком событии ?

procedure TForm1.Button1Click(Sender: TObject);
begin
form1.left:=100;
form1.top:=100;
end;

У нас принято оформлять код специальным тэгом - при помощи кнопочки "#".
Только...
И не значком #.
И не РНР-кодом.
И не значком цитаты.
И не собственными "ручками".
Рекомендую. Помимо общих правил форума есть и дополнения к ним в каждом разделе...
Модератор

А что у вас в Position формы стоит ? Небось - poScreenCenter ? Или poDesktopCenter ?

poDesktopCenter
из-за него чоль? сделал специально, чтоб форма в центре появлялась при загрузке. как еще?

А какие события для формы определены вами ?

никаких. пустая форма с кнопкой.

А может, она у вас там и стоит - на сотенках ? Вы ее сдвиньте куда-нибудь вручную сначала. Двигается ?

не, не на сотках стоит. двигается нормально.

[spamer]

Все отлично работает. Даже если Position формы выставить в poScreenCenter или poDesktopCenter.

У меня тоже. (Я ж говорю - глюкануло у ТС)
Михалыч.

[mosq]

похоже на глюк, точно. сейчас заработало.

ладно, но я нашел где дальше опять не хочет менять
при загрузке вставил замену координат в Form1.OnShow , а форма остается на месте. Может надо в OnPaint или OnCreate вставить это?

[mihali4]

OnActivate, OnPaint, OnResize...

[mosq]

Попробовал

OnActivate

Он при каждом переключении на прогу передвигает ее на указанные координаты. надо только при загрузке..

OnPaint

так же непонятно. передвинул, а потом во время движений по форме (я уже переместил окно в другую сторону) еще раз взял и передвинул форму на те координаты. не подходит.

OnResize

форма без ресайза. или Вы имеете ввиду, что это событие обрабатывается при создании формы?

[mihali4]

Не понял...
Что нужно-то ?
Чтобы форму как ни двигай, она все равно возвращалась на 100,100 ?
То есть, что бы ее нельзя было сдвинуть ?
Вопросы-то нужно формулировать понятно...
Тогда:

прописываем
procedure WMMove(var mess:TWMMove);message WM_Move;
...
procedure TForm1.WMMove(var mess: TWMMove);
begin
Left:=100;
Top:=100;
end;

[mosq]

нет. в итоге мне нужно сделать при закрытии формы - сохранение координат расположения. при открытии - восстановление.

[VovanZ]

попробуйте добавить form1.update;