TIcon.Handle readonly progleme

[shmia]

Zitat von day:

Ich habe folgendes problem. Die variable Handle ist als readonly deklariert.

Das stimmt doch gar nicht (zumindest nicht bei Delphi 5 +)
Hier der Beweis: (gekürzter Sourcecode)

Delphi-Quellcode:

  TIcon = class(TGraphic)
  private
    function GetHandle: HICON;
    procedure HandleNeeded;
    procedure SetHandle(Value: HICON);
  protected
   ...
  public
    ...
    property Handle: HICON read GetHandle write SetHandle;
  end;