Uses initialisierung erwartet

[samtronvirus]

Moin,
ich habe vor, eine art Bot zu schreiben, also Notepad oeffnen und einen text eintragen.
also eigentl. relativ einfach.

Das ist der Code

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);


uses
 Shellapi;

begin
  ShellExecute(Handle,open,notepad,NULL, NULL, SW_MAXIMIZED);
end;
begin
     keybd_event(Ord('A'), 0, 0, 0);
     keybd_event(Ord('A'), 0, KEYEVENTF_KEYUP, 0);
     keybd_event(Ord('M'), 0, 0, 0);
     keybd_event(Ord('M'), 0, KEYEVENTF_KEYUP, 0);
end;
end.

Das Problem ist aber, dass uses rot unterstrichen ist | [DCC Fehler] Unit1.pas(29): E2029 Deklaration erwartet, aber 'USES' gefunden|

Und ich weiss nich warum das so ist, ich habe erst vor ein paar tagen mit delphi angefangen.
ich habe sehr viel im Forum gesucht, die letzten 2 Tage, find jedoch nix gescheides.
Wenn ich interface ueber uses schreib, is zwar uses nich mehr rot, aber interface xD

Kann mir vllt jemand helfen

danke schonmal

[grenzgaenger]

allgemein, kann man auch mal die OH verwenden. aber zu deinem problem, USES darf nur an zwei stellen in der unit oder 1x im programm erscheinen

Delphi-Quellcode:

unit abc;
interface
 uses ...; //hier das erste mal
...
implementation
uses ...; //hier das zweite mal
....
end.

also nicht zwischen procedure/function und dem folgendem begin ... end.

<HTH>

[samtronvirus]

ah ok danke, jetzt hats auch mein gehirn gerafft =))