求教(10分)

  • 主题发起人 主题发起人 dbf
  • 开始时间 开始时间
D

dbf

Unregistered / Unconfirmed
GUEST, unregistred user!
各位大哥大姐:
我写了一个程序,想让程序运行时,执行窗体不可见,请问怎么解决?谢谢!祝各位好运
 
代码.....
 
ShowWindow(Application.Handle, SW_HIDE);
 
我做了一个用按钮实现显示、隐藏窗体,试一下:
procedure TForm1.FormCreate(Sender: TObject);
begin
do
Invisible;
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
if Button1.Caption = 'Show' then
begin
do
Visible;
Button1.Caption := 'Hide';
end
else
begin
do
Invisible;
Button1.Caption := 'Show';
end;
end;
 
后退
顶部