Shellexecute richtig anwenden/übersetzen

[Delbor]

Zitat von KodeZwerg:

(um ganz genau zu seien musst du lpDirectory auf := '' setzen)

Das habe ich überlesen...

Zitat von KodeZwerg:

also das script funktioniert und erzeugt tatsächlich eine datei, ja?
ich bin gerade mehrere "Scripting.FileSystemObject" definitionen hinterher und da wirds oftmals im execute part eingebettet was hier nicht der fall ist.

Ja, aber eben nur die Windows-Testseite.

Gruss
Delbor

[KodeZwerg]

Delphi-Quellcode:

procedure TPDFCreatorFrame.ImageToPDF;
  var job : IPrintjob;
      jobinfo : IPrintJobInfo;
      PDFQueue : TQueue;
      LOutput : IOutputFiles;
begin
  PDFQueue := TQueue.Create(Self);
  try
    Showmessage('procedure TPDFCreatorFrame.ImageToPDF: Der Wert von FFilename ist: '+' "'+ FFilename + '" ');
// FFilename ist: 'C:\PDFOfficerAppdata\PdfOfficerData\ScannedPic.jpeg';
    LOutput := IOutputFiles.Create(FFilename); // oder sowas ?
    PDFQueue.Initialize; // Initializing PDFCreator queue...

da der das ganze anscheinend als objekt abarbeitet eventuell dem das irgendwie mittleilen?
ich bin da echt nur am raten da ich das nicht habe.