Um ganz ehrlich zu sein, habe ich nicht den Hauch einer Ahnung, was Dein Problem ist...
In der Delphihilfe ist doch ein Beispiel mit einer For Schleife...
Code:
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;
ich habe echte Verständnisprobleme...
Und ich glaube, das mit den
Indy Komponenten gehört in einen neuen Thread... Wobei ich das glaube ich einfach lösen würde, indem ich das zur Laufzeit erzeuge ?!?
Grüße...