/? Hilfe in der Konsole

[Sir Rufo]

Ich wette mal, dass dein Problem an einer ganz anderen Stelle liegt und null,nix mit den Parametern zu tun hat.

Stell doch einfach mal die Frage zu deinem konkreten EFOpenError , dann könnten wir dir auch konkret helfen.

"Herr Doktor, ich habe am ganzen Körper Schmerzen. Wenn ich an den Kopf tippe, an das Knie, an den Bauch, einfach überall."
Diagnose: Finger gebrochen!

[GroZ]

Naja ich weiß halt nur nicht wie ich das Verzeichnis einlesen soll. Ich weiß das wenn ich das Verzeichnis habe. Das ich dann mit FindFirst und FindNext die FRP Dateien suchen muss und dann meine Routine ablaufen lassen muss.

[Sir Rufo]

Zitat von GroZ:

Naja ich weiß halt nur nicht wie ich das Verzeichnis einlesen soll. Ich weiß das wenn ich das Verzeichnis habe. Das ich dann mit FindFirst und FindNext die FRP Dateien suchen muss und dann meine Routine ablaufen lassen muss.

Du weisst, dass dabei in dem TSearchRec der Dateiname ohne Pfad enthalten ist?
(Was man mit dem Debugger sehr leicht feststellen kann/könnte)

Und in der Dokumentation steht es auch
http://docwiki.embarcadero.com/Libra...ils.TSearchRec

[GroZ]

Also brauche ich FindFirst und FindNext gar nicht?

[Sir Rufo]

Zitat von GroZ:

Also brauche ich FindFirst und FindNext gar nicht?

Einmal in der Dokumentation auf Codebeispiele geklickt und wie durch Zauberhand kommt ...
http://docwiki.embarcadero.com/CodeE...t_%28Delphi%29

[p80286]

Also Gut, nehmen wir mal an, daß wirklich nur der Startpfad übergeben wird.

Delphi-Quellcode:

startpfad:='';
for i:=1 to paramcount do
  startpfad:=startpfad+' '+paramstr[i];
if (length(startpfad)>0) and (startpfad[1]='"') then
    delete(startpfad,1,1);
if (length(startpfad)>0) and (startpfad[length(startpfad)]='"') then
    delete(startpfad,length(startpfad),1);

so ungefähr sollte es funktionieren.
Wenn u.U. auch noch "/?" oder "-H" übergeben werden sollte, dann mußt Du Dir da etwas einfallen lassen.

Gruß
K-H

P.S.
Natürlich brauchst Du Findfirst/Findnext, wie willst Du sonst an die Dateinamen kommen?
OK mit Opendialog ginge das auch, wenn man klickwütig ist.

[Sir Rufo]

@p80286

Die Quote-Chars werden automatisch entfernt, bzw. erst gar nicht an die Anwendung übergeben.

CmdLine	ParamStr(1)	ParamStr(2)
foo.exe "C:\MeinPfad"	C:\MeinPfad
foo.exe C:\MeinPfad	C:\MeinPfad
foo.exe "C:\Mein Pfad"	C:\Mein Pfad
foo.exe C:\Mein Pfad	C:\Mein	Pfad