在书上的软件封面制作方法都是要操作工程代码
这里提供一个更简洁的方式
(源码详见:http://www.delphifans.com/SoftView/SoftView_1856.html)
procedure TFormflash.Timer1Timer(Sender: TObject);
begin
formflash.Close;
end;
----------------------------------------------------------------------------
procedure TForm1.Button1Click(Sender: TObject);
begin
close;
end;
procedure TForm1.FormShow(Sender: TObject);
begin
formflash.showmodal;
formflash.free;
end;
本文章有一个14岁的编程爱好者(阿胡工作室)发布,由于经验较少,有漏洞请提出
联系方式
QQ:523905898
E-mail: mike000908@21cn.com
欢迎联系