L liangzi123 Unregistered / Unconfirmed GUEST, unregistred user! 2006-11-28 #1 软件运行时根据像素不同，执行不同操作 分不够再加
A Avalon Unregistered / Unconfirmed GUEST, unregistred user! 2006-11-28 #2 procedure TForm1.Button1Click(Sender: TObject); begin label1.Caption:=IntToStr(Screen.Width); label2.Caption:=IntToStr(Screen.Height); end;
procedure TForm1.Button1Click(Sender: TObject); begin label1.Caption:=IntToStr(Screen.Width); label2.Caption:=IntToStr(Screen.Height); end;
