Calling LibreOffice Writer

[w click]

I've used this:–

Code: Pascal  [Select][+][-]

1.   Runcommand('C:\Program Files\LibreOffice\program\swriter.exe',['d:\Current Files\test.odt'],sout);
2.  

And it works fine, but I think runcommand causes the program to hang.  So, I've converted to ShellExecute:–

Code: Pascal  [Select][+][-]

1.  if ShellExecute(0,nil,PChar('C:\Program Files\LibreOffice\program\swriter.exe'),PChar('d:\Current Files\test.odt'),PChar(''),1)=0
2.     then form1.label1.caption:='FAIL.'
3.     else form1.label1.caption:='OK.';

It works for all programs this application opens (Word, Excel, etc), except for LibreOffice. LibreOffice Writer creates an error: it can't find 'd:\current'.  It's that space in 'Current Files'.  Is there a solution to this?  A way of passing a space without it being a parameter terminator or something?

[marcov]

Note that the two ways are fundamentally different. That way, runcommand tries to keep a link 'to the program to capture its output, while shellexecute doesn't.

Shellexecute works like a commandline iirc, so you have to quote arguments with spaces in them (while runcommand does that for you).

Code: Pascal  [Select][+][-]

1.  ShellExecute(0,nil,PChar('C:\Program Files\LibreOffice\program\swriter.exe'),PChar('"d:\Current Files\test.odt"'),PChar(''),1)=0
2.  

As a more platform independent way, see https://wiki.freepascal.org/OpenDocument

[zeljko]

I've used this:–

Code: Pascal  [Select][+][-]

1.   Runcommand('C:\Program Files\LibreOffice\program\swriter.exe',['d:\Current Files\test.odt'],sout);
2.  

And it works fine, but I think runcommand causes the program to hang.  So, I've converted to ShellExecute:–

Code: Pascal  [Select][+][-]

1.  if ShellExecute(0,nil,PChar('C:\Program Files\LibreOffice\program\swriter.exe'),PChar('d:\Current Files\test.odt'),PChar(''),1)=0
2.     then form1.label1.caption:='FAIL.'
3.     else form1.label1.caption:='OK.';

It works for all programs this application opens (Word, Excel, etc), except for LibreOffice. LibreOffice Writer creates an error: it can't find 'd:\current'.  It's that space in 'Current Files'.  Is there a solution to this?  A way of passing a space without it being a parameter terminator or something?

Why not just LCLIntf.OpenURL() ? It works here (for known/default mimetypes of course).

[marcov]

opendocument passes to url, if it is an uri, and otherwise uses shellexecute.

[zeljko]

Ah, yes, typo

[Thaddy]

Furthermore, put a path with spaces between double quotes.

[w click]

Code: Pascal  [Select][+][-]

1.  ShellExecute(0,nil,PChar('C:\Program Files\LibreOffice\program\swriter.exe'),PChar('"d:\Current Files\test.odt"'),PChar(''),1)=0
2.  

That works – thank you.

But, why does 'Current Files' have to be in double quotes to avoid the space issue and 'Program Files' does not?