怎样让程序启动时自动就最小化到任务栏,然后禁止最大化和还原 就是说让他了解程序在运行,但是不让他看到界面。不需要隐藏到右下角,谢谢 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 program Project1;uses Forms, Unit1 in 'Unit1.pas' {Form1};{$R *.res}begin Application.Initialize; Application.CreateForm(TForm1, Form1); Application.MainForm.WindowState:=wsMinimized; //在*.dpr中添加此句 Application.Run;end.或者在上述位置添加 Application.Minimize;这样,程序启动后就会自动最小化到任务栏。要禁止最大化和还原,可以截获对应的消息。 定义一个Timer,设定100ms后动作.procedure TForm1.Timer1Timer(Sender: TObject);begin self.Width:=0; self.Height:=0; self.BorderStyle:=bsNone;end; C++结构中用了union来节省内存,翻译成delphi必须转换成变体记录吗? 大家知道 DevExpress ExpressBar Suite. v5.4 要怎么安装吗?! 求一段代码,大家进来帮帮忙哈。急哦 请问各位大虾,急!!!! 如何更新已经import过的ActiveX组件?急!! 关于分页打印 各位前辈帮看看这段FILTER的代码有没有问题? d6有没有好书啊? 请问该事件可以通过发送消息或其他的方法来触发吗? 请问哪里有delphi5的升级包及序列号下载? 用spvoice1.speak朗读中文,我不想让程序朗读标点符号,该怎样设置呢?急~~~ 高手请进~~
Forms,
Unit1 in 'Unit1.pas' {Form1};{$R *.res}begin
Application.Initialize;
Application.CreateForm(TForm1, Form1);
Application.MainForm.WindowState:=wsMinimized; //在*.dpr中添加此句
Application.Run;end.或者在上述位置添加 Application.Minimize;这样,程序启动后就会自动最小化到任务栏。要禁止最大化和还原,可以截获对应的消息。
procedure TForm1.Timer1Timer(Sender: TObject);
begin
self.Width:=0;
self.Height:=0;
self.BorderStyle:=bsNone;
end;