auslesen der übergebenen parameter

[Daniel B]

Hallo jaby,

hier mal ein kleines Bespiel:

Delphi-Quellcode:

procedure TForm1.FormShow(Sender: TObject);
begin
  sndPlaySound(PChar(ParamStr(2)), SND_ASYNC);
//SND_SYNC = Während die Datei abgespielt wird, steht das Prog.
//SND_ASYNC = Die Datei wird unabhängig vom Programm abgespielt
//SND_LOOP = Immer wieder und immer wieder
  Label1.Caption:=ParamStr(1);
end;

Der erste übergebene Parameter, ist die Caption eines Labels, der zweite ist eine Sounddatei, bzw. der Pfad davon, die abgespielt werden soll.

Grüsse, Daniel