Windows API in FreePascal

[JayK]

Wenn ich in Freepascal ein Programm habe, wo folgendes drinsteht:

Delphi-Quellcode:

program RIC;

{$APPTYPE Console}

uses
  Windows;

begin
  WriteLn('Aktualisiere Icon Cache...');
  try
    SHChangeNotify(SCHNE_ASSOSCHANGED, SHCNF_IDLIST, nil, nil);
  except
    WriteLn('Fehler beim Aktualisieren!');
end;
end.

dann kommt als Fehlermeldung:

Zitat von FPC:

Error: Identifier not found "SHCNE_ASSOCCHANGED"
Error: Identifier not found "SHCNF_IDLIST"