paramstr()的值從何而來?有誰知道,麻煩指點一下,謝謝了(40分)

  • 主题发起人 主题发起人 lixianxiang
  • 开始时间 开始时间
L

lixianxiang

Unregistered / Unconfirmed
GUEST, unregistred user!
除了在run/parameters可以改變paramstr的初始值外
怎樣在程序中改變paramstr的值?
怎樣將longin.exe中的paramstr的值傳遞到main.exe中的paramstr
有誰知道,麻煩告訴我一下,好嗎?謝謝了
 
命令行参数
winexec('main.exe 参数', 0);
 
ParamCount函数




System


function ParamCount:Integer;


ParamCount返回传给命令选行的参数个数。分开的参数以空格或制表格分开。使用双引号来包含多个元素作为一个参数(像长文件名包含了空格)。


begin

if ParamCount=0 then

Canvas.TextOut(10,10,’No parameters on command line’)

else

Canvas.TextOut(10,10,IntToStr(ParamCount)+’ parameter(s)’);

end;

System


function ParamStr(Index:Integer):string


ParamStr从命令行中返回一个指定的参数。Index是一个整型类表达式。ParamStr从Index对应的命令行返回参数,或者如果Index是大于ParamCount,则Index视为一个空字符串。例如:一个Index为2的值,返回第二个命令行参数。ParamStr(0)返回执行程序的路径和文件名(例如,C:/Test/myprog.exe)。


var

I:Word;

Y:Integer;

begin

Y:=10;

for I:=1 to ParamCount do

begin

Canvas.textout(5,y,paramstr(i));

Y:=y+Canvas.textHeight(ParamStr(i))+5;

end;

end;
 
多人接受答案了。
 
后退
顶部