Delphi-PRAXiS
Seite 2 von 2     12   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi Exe starten!!! (https://www.delphipraxis.net/34230-exe-starten.html)

Daniel 19. Nov 2004 17:34

Re: Exe starten!!!
 
Das drag and drop entfällt in Deinem Fall. Du startest die EXE des Konverters und übergibst den Dateinamen als ersten Parameter. Nichts anderes wird der Explorer machen.

Asgan 19. Nov 2004 17:38

Re: Exe starten!!!
 
kannst du es mir als Quellcode schreiben, bin völliger n00b, kenn nur die paar grundsachen außer schule.

Luckie 19. Nov 2004 18:21

Re: Exe starten!!!
 
Das in meinem ersten Beitrag sind Links, auf die kann man draufklicken.

Asgan 19. Nov 2004 19:22

Re: Exe starten!!!
 
ja schon klar aber bei über 500 suchergebnisen, da find ich mich net zurecht, bis ich alle durchgelesen hab.

Wärt ihr bitte so gütig und könntet mir irgendwie die Zeile mit dem Parameter geben. *bitte*

Darty 19. Nov 2004 19:44

Re: Exe starten!!!
 
Zitat:

Zitat von Asgan
ja schon klar aber bei über 500 suchergebnisen, da find ich mich net zurecht, bis ich alle durchgelesen hab.

Wärt ihr bitte so gütig und könntet mir irgendwie die Zeile mit dem Parameter geben. *bitte*

das ?
Delphi-Quellcode:
ShellExecute(Application.Handle, 'open', PChar(Filename), nil, nil, SW_NORMAL);
da stehts auch drin ShellExecute vorher noch Shellapi einbinden.

Asgan 19. Nov 2004 19:52

Re: Exe starten!!!
 
soweit hats ich auch, aber wo muss ich jetzt da die mp3 als parameter eingeben, bei Filename kommt der Audiokonverter hin.

_master_ 19. Nov 2004 20:00

Re: Exe starten!!!
 
versuch mal das da, es prüft ob die datei gestartet wurde, und du brauchst nur
uses Windows;

Delphi-Quellcode:
const
  FileMp: String = 'C:\mp3.exe';
...
function RunFile: boolean;
var
  Str: String;
begin
  Str := FileMp + ' /whatever';

  if WinExec(pChar(Str), SW_SHOWNORMAL) >31 then
    Result := True
  else
    Result := False
end;
// -----------
// Aufrufen:
  if RunFile then
  begin
    ShowMessage('Datei wurde ausgeführt');
    ...
  end else
  begin
    ShowMessage('Datei konnte nicht gestartet werden');
  end;

Darty 19. Nov 2004 20:01

Re: Exe starten!!!
 
Delphi-Quellcode:
  ShellExecute(Form1.Handle, 'open', PChar(EditProgramm.Text), PChar(EditParamter.Text), PChar(EditArbeitsverzeichnis.Text), sw_show);
Delphi-Quellcode:
 ShellExecute(Application.handle, 'open', PChar('AudioKonverter'), PChar('MP3-Filename'), NIL, sw_show);
Hoffe das ich jetzt nicht falsch geschrieben habe

Asgan 19. Nov 2004 20:04

Re: Exe starten!!!
 
cool danke danke es funtzt.

Kernel32.DLL 20. Nov 2004 11:30

Re: Exe starten!!!
 
ach und beim nächsten mal, wenn du nicht weiterweißt:

man kann in delphi den Ausdruck, zu dem man mehr infos brauch (in deinem fall "shellexecute") markieren und mit "F1" die Hilfe aufrufen. Da steht dann auch, für was welcher parameter gebraucht wird...

(nur so als tip) :zwinker:


Alle Zeitangaben in WEZ +1. Es ist jetzt 12:09 Uhr.
Seite 2 von 2     12   

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