deklaration unterscheidet sich von vorheriger ?!?!?

[Lord Dave]

Lässt sich bei mir ohne Fehlermeldung compilieren.
(Nur die Signaturen kopiert)

Delphi-Quellcode:

unit Unit2;

interface
uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, ComCTRLs;

type
TMyListView = class(TCustomListView)
  private 
    FExtTypes: Boolean;

    FImageList: TImageList; 
  protected
  public 
    property ExtTypes: Boolean read FExtTypes write FExtTypes;
    property ImageList: TImageList read FImageList write FImageList; 

    procedure ChangeBitmap(Bitmap: TBitmap; Index, Width, Heigth: Integer);
   end;

implementation


procedure TMyListView.ChangeBitmap(Bitmap: TBitmap; Index, Width, Heigth: Integer);
var
  ImageIndex: Integer;
begin
  ImageIndex := FImageList.Add(Bitmap, nil);
end;
end.