1.将自动生成的project代码做如下改造
program Project1;
uses
Forms,
SysUtils,
{$R *.res}
begin
Application.Initialize;
Application.CreateForm(TForm1, Form1);
if (ParamCount >0)and SameText(ParamStr(1), '-h' ) then
begin
Form1.WindowState:=wsminimized;
end
else
begin
Form1.WindowState:=wsMaximized;
end;
Application.Run;
end.2.调用方式
a.命令行 exe路径 -h
这时窗口会最小化显示
b 命令行 exe路径
这时窗体会最大化显示
3.注意通过bat文件或命令行时 路径不要带引号,特别是 传命令行参数时,会出现找不到程序的错误
本文介绍了一种使用Delphi编程语言控制程序窗口状态的方法,包括如何根据命令行参数实现窗口最小化或最大化显示的功能。提供了具体的代码示例,并说明了调用方式及注意事项。
861

被折叠的 条评论
为什么被折叠?



