Thandle und Fillchar nicht deklarierte Bezeichner?

[blacmesa]

Hallo, ich habe hier im Forum einen Code gefunden zum Auslesen von Icons.
Da wird auch ein Thandle Object benutzt. Dieses kennt Delphi aber im Moment nicht.
In der Hilfe habe ich auch nichts gefunden, wie ich das deklarieren muss.

Könnte mir da jemand unter die Arme greifen, was ich machen muss, damit diese
jetzt verfügbar sind: Das gleiche Problem habe ich mit Fillchar.

Ich benutze Delphi 2005 Personal

Code:

interface

uses
  System.Drawing, System.Collections, System.ComponentModel,
  System.Windows.Forms, System.Data, Borland.Vcl.SyncObjs
 ,Borland.Vcl.Graphics , System.Resources, shellapi, Classes, SysUtils;

//---Wegen der Übersichtlichkeit weggelassen. Ist alles was Delphi selbst generiert hat

function FileIcon(Name: String):ticon;
var
  FileInfo: TSHFileInfo;
  ImageListHandle: THandle;
  aIcon: TIcon;
begin
  FillChar(FileInfo, SizeOf(FileInfo), #0);
  ImageListHandle := SHGetFileInfo(
    PChar(Name), 0, FileInfo, SizeOf(FileInfo),
    SHGFI_ICON or SHGFI_LARGEICON
  );
  try
    aIcon := TIcon.Create; 
    try
      aIcon.Handle := FileInfo.hIcon;
      aIcon.Transparent := True;
    except end; 
  except end;
  result:=aicon;
end;