сделал, но результата никакого(
Код:
x,y:integer;
procedure TForm1.FormHide(Sender: TObject);
begin
x:=Form1.left;
y:=Form1.top;
end;
procedure TForm1.FormShow(Sender: TObject);
begin
Form1.left:=x;
Form1.top:=y;
end;
Зы: ДА, переменные подключены к другим модулям через uses
Получается как бы координаты берет не с последнего места расположения а какими они были при показе формы