Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi ShellExecute ! Was habe ich falsch gemacht? (https://www.delphipraxis.net/85224-shellexecute-habe-ich-falsch-gemacht.html)

skyquaker 27. Jan 2007 16:39


ShellExecute ! Was habe ich falsch gemacht?
 
Delphi-Quellcode:
...
uses shellapi;
...
...
begin
...
ShellExecute(Form1.Handle, nil, PCHAR(Instdir+'Data\conv.exe'),
PCHAR(' -h '+tempdir+'temporary.wav '+Instdir+'Output\'+fn+'.mp3'), nil, SW_SHOWMAXIMIZED);
...
end
Ich versuche den LAME Encoder (Lame.exe umbennant nach conv.exe) auszuführen. Die Anwendung lässt sich compilieren, doch der Lame Encoder wird nicht (oder nur so kurz, dass er nicht sichtbar ist) gestartet und meine Datei bleibt dieselbe.

Instdir und Tempdir:
Delphi-Quellcode:
Reg:= TRegistry.Create;
Reg.RootKey := HKEY_LOCAL_MACHINE;
Reg.OpenKey('\Software\...\', false);
instdir := Reg.ReadString('Installdir');
tempdir := Reg.ReadString('Tempdir');
FN :
Delphi-Quellcode:
fn := ChangeFileExt(ExtractFileName(opendialog1.filename), '');
Was habe ich falsch gemacht?

Klaus01 27. Jan 2007 16:44

Re: ShellExecute ! Was habe ich falsch gemacht?
 
Hallo,

vielleicht magst Du dir eimal diesen Thread anschauen, und da den Beitrag 7.

Grüße und ein schönes Wochenende.

Klaus

MathiasSimmack 27. Jan 2007 16:45

Re: ShellExecute ! Was habe ich falsch gemacht?
 
Zitat:

Zitat von skyquaker
Instdir und Tempdir sind Registry Werte (DWORDS)

Zahlen? :gruebel:

skyquaker 27. Jan 2007 16:48

Re: ShellExecute ! Was habe ich falsch gemacht?
 
Zitat:

Zitat von Klaus01
Hallo,

vielleicht magst Du dir eimal diesen Thread anschauen, und da den Beitrag 7.

Grüße und ein schönes Wochenende.

Klaus

Danke, den Thread schau ich mir mal an. :thumb:

skyquaker 27. Jan 2007 16:58

Re: ShellExecute ! Was habe ich falsch gemacht?
 
Habs geschafft, vielen Dank.

Delphi-Quellcode:
ShellExecute(
        Handle,
        'open',
        PChar(Instdir + 'Data\conv.exe'),
        PChar('"'+Tempdir+'\temporary.wav'+'" "' + Instdir+'Output\'+fn+'"'+'.mp3'),
        nil,
        SW_SHOWNORMAL
      );


Alle Zeitangaben in WEZ +1. Es ist jetzt 06:17 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz