Einzelnen Beitrag anzeigen

aramintaros

Registriert seit: 14. Mai 2008
48 Beiträge
 
#6

Re: ShellExecute funktiomert nicht richtg mit Parameterangab

  Alt 8. Mai 2009, 04:47
Zitat von jaenicke:
Zudem kannst du auch das Arbeitsverzeichnis angeben, dann solltest du dir die Pfadangaben sparen können in den Parametern. (Auch wenn es sicherlich so besser ist, aber das kann als Parameter evtl. zu lang werden.)
Wenn du die kompletten Pfade angibst, darfst du jedenfalls die Anführungszeichen nicht vergessen (falls Leerzeichen im Pfad sind).
Grüss dich jaenicke,

Die festen Pfadangaben (als auch der Counter und Edit1) sind nur zu Testzwecken, die sollen nachher vom FileOpenDialog1(multiselect=true) an ShellExecute als eine Variable übergeben werden.
So gibt es die Möglichkeit aus verschieden Ordnern unterschiedliche Files zusammen zu fügen, hoffe ich jedenfalls.

Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
  Filelist: TStringlist;
  Filecount,Counter : integer;
begin
  Filelist:= TStringList.Create;
  if FileOpenDialog1.Execute then
  begin
    for Filecount := 0 to FileOpenDialog1.Files.Count - 1 do
    begin
      Filelist.AddStrings(FileOpenDialog1.Files);
      ListBox1.Items.Add(Filelist[Filecount]);
      StringGrid1.Cols[0].Add(Filelist[Filecount]);
      RzStringGrid1.Cols[0].Add(Filelist[Filecount]);
    end;
  end;
  Counter:= Counter + Filecount;
  Edit1.Text:= IntToStr(Counter);
end;
Ich gestehe daß ich nicht genau weiss was du in diesem Fall mit dem Arbeitsverzeichnis(Workdir) meinst
Kannst du mir ein Beispiel geben was das mit den Anführungszeichen auf sich hat?
Habe meinen Text korregiert und dazu geschrieben:
Da ich kein Profi bin und manchmal die Hilfe nicht richtig verstehe , wäre ein Beispiel nicht nur hilfreich sonder auch lehrreich.
Die Hilfe von Delphi ist teilweise sehr kryptysch für mich und wenn auf die MSDN-Seiten verwiesen wird kann ich die nicht umsetzen.
Vielleicht gibt es da eine verständliche Beschreibung?
  Mit Zitat antworten Zitat