几个简单的问题,希望大家解答(40分)

  • 主题发起人 主题发起人 shigongping
  • 开始时间 开始时间
S

shigongping

Unregistered / Unconfirmed
GUEST, unregistred user!
1.创建单个窗口对象
用Application.Create(TForm1,Form1);
Form1.Show;//创建了窗口Form1
如何判定一个窗口是否已经创建了,如果已经创建了,Form1可能处于最小化状态,如何把它
还原为该窗口刚创建时所规定的大小和位置
2.创建多个窗口对象
用var MdiChild:TForm1;
begin
MdiChild:=TForm1.Create(Self);
MdiChild:=TForm1.Create(Application);//这两个拥有者的差别是什么呢
end
3.关于Sender的问题
procedure TfrmZipcode.DBGrid1DrawColumnCell(Sender: TObject;
const Rect: TRect; DataCol: Integer; Column: TColumn;
State: TGridDrawState);
begin
if (TCustomADODataSet(Qry).Recno mod 2)=0 then //记录号是双数
begin
(sender as TDBGrid).Canvas.Font.Color:=clblack;
//如果这里把sender as TDBGrid直接换为DBGrid1,为什么不行呢
(sender as TDBGrid).Canvas.Brush.color:=$00F0E8D9
end
else
begin
(sender as TDBGrid).Canvas.Font.Color:=clblack;
(sender as TDBGrid).Canvas.Brush.color:=clWindow
end;
(sender as TDBGrid).DefaultDrawColumnCell(Rect,DataCol,Column,State);
end;

谢谢大家给与解答,本人是一个新手,希望大家多多帮忙
 
1。关闭窗口close事件设 form1:=nil;
创建时可以: if form1<>nil then
 
2. self=当前窗体
TForm1.Create(Self);则当前窗体关闭时关闭form1
TForm1.Create(Application) 整个程序退出才释放form1
 
3.应该可以
 
to michael.ma,
这个我知道
我想知道的是,假设窗口已经创建了一个对象,而且被最小化了,当点饥‘恢复’按钮时,该窗口恢复到
最小化以前的状态或者窗口刚创建时的状态
 
postmessage(form2.Handle,WM_SYSCOMMAND,SC_RESTORE,0);
 
怎么都没有人回答呢,分不够??
 
后退
顶部