Hey Leute,
bin gleich mit den Nerven am Ende! Möchte ein Programm per Knopfdruck mit ShellExecute öffnen, wobei der Pfad für die Datei aus einer InI kommt. habe schon einmal Hilfe angefort und bekam eine Antwort, dass ich dem DateiPfad eine Variable geben soll, welche dann in Shell Execute angegeben wird.

uses ShellAPI;

zusammenfalten · markieren

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);

var Pfad : String;
    Ini : TIniFile;
begin
Ini := TIniFile.create('C:\a.ini');
Try
Pfad := Ini.readstring('1','1',text);
Finally
FreeAndNil(ini);
ShellExecute(Handle, nil, 'Pfad', nil, nil, SW_SHOW);


end;
end;
end.

Das ist mein Code

Finde den Fehler nicht. Datei existiert, Prog startet, aber bei Klick auf Button tut sich nix...

Danke im Vorraus

versuch mal deine Variable ohne Häcken beim Shellexecute.
die häcken bewirken das alles was dazwischen ist als een string interpretiert wird.
im momement versuchst du eine Datei Namens: Pfad zu starten

Veruchs mal mit:

ShellExecute(Handle, nil, Pfad, nil, nil, SW_SHOW);

geht leider auch nicht

Hallo DJ-SPM,
versuchs mal so
ShellExecute(0, nil, PChar(Pfad), nil, nil, SW_SHOW); bye

Hey Duffy,

mein Retter in Not. Es funzt!!!!! Klasse, BigTHX!!!

Hi,
ist genaugenommen immer noch ein wenig falsch: du sagst ShellExecute nicht was du eigentlich tun willst.
Korrekt wäre daher:
ShellExecute(Handle, 'open', PChar(Pfad), nil, nil, SW_SHOW); Aber das ist eigentlich nur kleinschei***ei...

Chris

Zitat von Chakotay1308:

Korrekt wäre daher:
ShellExecute(Handle, 'open', PChar(Pfad), nil, nil, SW_SHOW);

Der PSDK sagt dazu

Zitat:

...
lpOperation
...
NULL
For systems prior to Microsoft® Windows® 2000, the default verb is used if it is valid and available in the registry. If not, the "open" verb is used.

For Windows 2000 and later systems, the default verb is used if available. If not, the "open" verb is used. If neither verb is available, the system uses the first verb listed in the registry.

Korrekt ist demnach für EXE-Dateien 'open' oder nil. Für normale Dateien ist auf jeden Fall nil korrekt, da es nicht für jede registriete Dateiendung den Registryeintrag ...Shell\Open\Command gibt. Auch diese Dateien können mit ShellExecute "gestartet" werden, sofern man nicht 'open' sondern nil angibt.