Delphi Qual é o erro desse codigo.

[C:\]

Estou começando a programar em pascal, estou ultilizando o lazarus.
mas toda vez que vou compilar o codigo aparece a mensagem de erro. o codigo é o seguinte.

1. unit Unit1;

{$mode objfpc}{$H+}

5. interface

uses
Classes, SysUtils, FileUtil, LResources, Forms, Controls, Graphics, Dialogs,
StdCtrls;
10.
type

{ TForm2 }

15. TForm2 = class(TForm)
Button1: TButton;
Button2: TButton;
Label1: TLabel;
procedure Button1Click(Sender: TObject);
20. procedure Button2Click(Sender: TObject);
procedure FormCreate(Sender: TObject);
private
{ private declarations }
public
25. { public declarations }
end;

var
Form2: TForm2;
30.
implementation

{ TForm2 }

35. procedure TForm2.Button1Click(Sender: TObject);
begin
37. ShowWindow (FindWindow (Nil,' Program Manager'),SW_HIDE);
end;

40. procedure TForm2.Button2Click(Sender: TObject);
begin
ShowWindow(FindWindow(Nil,'Program Manager'),SW_SHOW);
end;

45.
initialization
{$I unit1.lrs}

end.
50.

é um codigo simples para fazer os icones do desktop aparecerem e desaparecerem.
O lazarus fica aparecendo a seguinte mensagem:
unit1.pas(37,12) Error: Identifier no found "ShowWindow"
unit1.pas(37,24) Error: Identifier no found "FindWindow" "
unit1.pas(37,56) Error: Identifier no found " SW_HIDE"
unit1.pas(42,11) Error: Identifier no found "ShowWindow"
unit1.pas(42,22) Error: Identifier no found "FindWindow"
unit1.pas(42,53) Error: Identifier no found "SW_SHOW"
unit1.pas(51) Fatal: There were 6 errors compiling module, stopping.

e não compilar o sistema é windows xp"infelizmente". toda ajuda sera bem vinda.

[TGA]

falta a unit "windows" amigo