如何在程序中改变FORM在屏幕的位置？(5分)

J

Jenky.w

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-11

• #1

如何在程序中改变FORM在屏幕的位置？

 

卷

卷起千堆雪tyn

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-11

• #2

procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
begin
Left :=Random(800);
Top :=Random(600);
end;

 

李

李清红

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-11

• #3

Form有一个属性“Position”即可改变。

 

K

kthy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-11

• #4

Left/Top

 

J

Jenky.w

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-11

• #5

tks

 

A

aben_zj

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-11

• #6

procedure TForm1.FormShow(Sender: TObject);
begin
Left :=20;
Top :=20;
end;

 

网

网络男孩

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-11

• #7

只要改一下form.left和form.top就可以了！