ShellExecute Fehler trotz bearbeiteter uses

[StolenURBike]

Servus Leute,
ich möchte gerade einen Refreshbutton programmieren und will dafür die ShellExecute benutzen.
Jedoch meckert Lazarus mit folgendem Befehl:

Code:

Error: Identifier not found "SW_SHOWNORMAL"

Andere Beiträge in diesem Forum sagen, dass man ShellApi in den Uses hinzufügen soll. Das habe ich aber bereits gemacht.

Code:

uses
Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs,                            ExtCtrls, Buttons, ShellApi, StdCtrls;

Ich habe euch auch noch meine Procedure angehangen.

Code:

procedure TForm1.BitBtn3Click(Sender: TObject);
begin
   ShellExecute(Handle, 'open', 'c:\Windows\project1.exe', nil, nil, SW_SHOWNORMAL);
end;

[Poelser]

Na, dann füg noch Windows zum Uses hinzu. Die Posts in Lazarus-Foren sehen so aus, als wenn's dort deklariert wäre.

CU,
Poelser

[DeddyH]

ShellAPI brauchst Du für ShellExecute, die Konstante SW_SHOWNORMAL ist aber AFAIK in Windows deklariert, die musst Du also auch einbinden.

[StolenURBike]

Danke! Das einbinden von Windows in Uses hat das Problem gelöst.