Association

http://www.eksperten.dk/spm/273574

Stoney

Lyder ok... Jeg har dog ikke mulighed for at afprove her og nu - men er ParamStr() et Api kald?

Ikke mig bekendt

Nej det er ikke et direkte apikald
Taget fra hjælpen

The following example beeps once for each “beep” passed in on the command line. The example terminates the application if  “exit” is passed in on the command line.

procedure TForm1.FormCreate(Sender: TObject);

var
  i: Integer;
  for i := 1 to ParamCount do
  begin
    if LowerCase(ParamStr(i)) = 'beep' then
      Beep
    elseif LowerCase(ParamStr(i)) = 'exit' then
      Application.Terminate;
  end;
end;

------------------

Returns a specified parameter from the command-line.

Unit

System

Category

command line utilities

function ParamStr(Index: Integer): string;

Description

ParamStr returns the parameter from the command line that corresponds to Index, or an empty string if Index is greater than ParamCount. For example, an Index value of 2 returns the second command-line parameter.

ParamStr(0) returns the path and file name of the executing program (for example, C:\TEST\MYPROG.EXE).

Note:    Use double quotes to wrap multiple words as one parameter (such as long file names containing spaces).

Jeg mener, hvor er ParamStr() deklaeret?

system

Stoney

OK - 1000 tak...

ParamStr() og ParamCount virker også fint i TurboPascal 6, der kan man (vistnok) ikke bruge API-kald (DOS) :)

Hvad betyder:

"Note: Use double quotes to wrap multiple words as one parameter (such as long file names containing spaces)."

Jeg har bemaerket at hvis en fil eller stien paa en fil indeholder et mellemrums-tegn bliver den opdelt!!!!

mitprogram.exe "dette er et filnavn med mellemrum.txt"

"dette er et filnavn med mellemrum.txt" // dette er 1 parameter

dette er // det er 2 parameter

Stoney