Ja das war von beiden sehr hilfreich, jedoch geht der Mist wieder nicht, habe es nun so:
Delphi-Quellcode:
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls;
type
TForm1 =
class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private-Deklarationen }
public
{ Public-Deklarationen }
end;
var
Form1: TForm1;
implementation
{$R *.DFM}
procedure TForm1.Button1Click(Sender: TObject);
var Exe:
string;
begin
begin
Exe := '
d:\windows\system32\notepad.exe';
ShellExecute(Application.Handle, '
open', PChar(Exe), '
', Pchar(ExtractFileDir(Exe)), SW_SHOW);
end;
end.
Kommen jedoch 3 Fehlermeldungen:
Unit.pas(31): Undefinierter Bezeichner: "ShellExecute"
Unit.pas(34): "," erwartet aber "." gefunden
Unit.pas(36): Deklaration erwartet, aber Dateiende gefunden
Und wieso geht das bei euch??
