Open Dialog (ShellExecute) Frage 2

[Trouble_Maker]

huhu

@toms: ja richtig: war einfach nen Denkfehler, weil mein Code so aussieht:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  if OpenDialog1.execute then
  begin
    ShellExecute(Handle, nil, PChar(OpenDialog1.FileName), nil, nil, SW_SHOW);
  end;

daher ...

danke werde ich später mal ausprobieren ...


cu Trouble_Maker