Blanks in Datei/Dateipfad

[JosefKoller]

Hallo,

ich benutze sumatraPDF als Anzeiger eingebunden auf ein Panel in meiner Application.

Code: Alles auswählen

 
var
  filename:string;
begin
 
  if OpenDialog1.Execute then
  begin
  filename:=OpenDialog1.FileName;
  with Process1 do
         begin
           CommandLine := 'SumatraPDF.exe ' +
                           '-reuse-instance -plugin '+
                           IntToStr(Panel1.Handle)+' '+
                           filename; //'inheritance.pdf';
           Execute;
         end;
  end;
end;     
 

Das funktioniert. Aber nur, wenn im Dateinamen und oder Dateipfad keine Blanks drinne sind.

Also "inheritance.pdf" funktiuoniert.
"C:\Personal 3\inheritance 2015.pdf" funktioniert nicht. Beim Aufruf des Readers wird schlicht der Dateiname -Pfad beim ersten Blank abgeschnitten.

Wie könnte man denn sowas hinbekommen?

Danke

Josef

[baumina]

Indem Du den Filename in Anführungszeichen setzt. QuotedStr oder was es da so gibt.

[JosefKoller]

Hallo,

nein, daß funktioniert nicht. Beim ersten Blnak ist Schluß.

"Fehler beim Öffnen von C:\Program". Weier gehen würde es mit Program Data ....

Vielleicht noch eine Idee?

Josef

[baumina]

Code: Alles auswählen

 
CommandLine := 'SumatraPDF.exe ' + 
               '-reuse-instance -plugin '+  
               IntToStr(Panel1.Handle)+' '+
               QuotedStr(filename);

oder

Code: Alles auswählen

 
CommandLine := 'SumatraPDF.exe ' + 
               '-reuse-instance -plugin '+  
               IntToStr(Panel1.Handle)+' "'+
               filename + '"';

Das funktioniert nicht? Oder was genau funktioniert nicht?

[JosefKoller]

Hallo,

mit quotedStr(filename) kommt nach dem Anzeigen der SumatraPDF-Oberfläche der genannte Fehlertext.

Aber die Version mit den "geschriebenen" Hochkommas funktioniert.

Code: Alles auswählen

 
CommandLine :=  'SumatraPDF.exe ' +
                           '-reuse-instance -plugin '+ IntToStr(Panel1.Handle)+
                           //QuotedStr(OpenDialog1.FileName);
                           ' "' + OpenDialog1.filename + '"';       
 

Danke.

Josef

[wp_xyz]

QuotedStr umgibt den String mit einfachen Anführungszeichen ('), das Betriebssystem will aber doppelte (").

[baumina]

Ich wusste jetzt nicht auswendig, obs auch einen Befehl, der doppelte Anführungszeichen bringt. Gibt's denn einen?

[Michl]

Ich wusste jetzt nicht auswendig, obs auch einen Befehl, der doppelte Anführungszeichen bringt. Gibt's denn einen?

Du könntest die Funktion aufrufen, die auch von QuotedStr aufgerufen wird:

Code: Alles auswählen

AnsiQuotedStr(FileName, '"')

[Socke]

Wenn du schon TProcess verwendest, kannst du auch die Eigenschaften Executable und Parameters verwenden. Das Quoting erledigt dann TProcess automatisch.