关于资源占用问题(50)

  • 主题发起人 主题发起人 terry_zhou82
  • 开始时间 开始时间
T

terry_zhou82

Unregistered / Unconfirmed
GUEST, unregistred user!
我的程序设定为开机运行且最小化到任务栏中。现在的问题是每次开机资源占用都非常高,只有当我先把他正常化,然后再按最小化按钮之后,资源占用才就会减少,我想请问下,有没有办法,是我一开机运行资源就很小?工程文件代码如下: Application.Initialize; Application.MainForm.Visible := False; if IsWindowVisible(Application.Handle) then ShowWindow(Application.Handle, SW_HIDE ); Application.Title := 'MYTEXT 1.0'; Application.CreateForm(TForm1, Form1); Application.CreateForm(TForm3, Form3); Application.CreateForm(TForm2, Form2); Application.Run;
 
建议你把主窗体一直隐藏起来所有的操作都在Form2上面做Application.ShowMainForm := False;Application.Run;
 
不太懂。具体代码怎么改呢?
 
If Win32Platform = VER_PLATFORM_WIN32_NT then begin SetProcessWorkingSetSize(GetCurrentProcess, $FFFFFFFF, $FFFFFFFF); Application.ProcessMessages; end;这是治标,
 
接受答案了.
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
D
回复
0
查看
2K
DelphiTeacher的专栏
D
D
回复
0
查看
2K
DelphiTeacher的专栏
D
D
回复
0
查看
1K
DelphiTeacher的专栏
D
后退
顶部