请教:如何使自己的Dephi客户端Exe带参数运行? 如何使自己的Dephi客户端Exe带参数运行?各路大侠请多多指教! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 procedure TForm1.FormCreate(Sender: TObject);var i: Integer; for i := 1 to ParamCount do begin if LowerCase(ParamStr(i)) = 'beep' then Beep else if LowerCase(ParamStr(i)) = 'exit' then Application.Terminate; end;end; ParamStr(0)为应用程序本身路径,ParamStr(1)为其后第一个参数,ParamStr(n)为... Report Machine报表控件中导出PDF组件问题 关于Delphi操作Excel的问题!急,在线等!~ 如何提高ADODataSet数据存成txt文件的速度? 如何设置DBChart的X轴的时间段 怎样计算某一列的和? 谁在reportfast里,用StoredProc1做数据源。给我个例子好吗? delphi下如何直接强制关机?? 如何对一长串字符移位? 一个数据库模式问题,急,在线等待 在线,解决马上给分!如何用idhttp通过代理验证下载文件!! 请问getmem是用什么API函数简化的? 请大家帮帮我这个问题把,我都作了1个星期了,实在是不会了!谢谢大家了!
procedure TForm1.FormCreate(Sender: TObject);
var
i: Integer;
for i := 1 to ParamCount do
begin
if LowerCase(ParamStr(i)) = 'beep' then
Beep
else if LowerCase(ParamStr(i)) = 'exit' then
Application.Terminate;
end;
end;