Einzelnen Beitrag anzeigen

Benutzerbild von sieppl
sieppl

Registriert seit: 15. Aug 2004
Ort: Münster
198 Beiträge
 
Delphi 7 Professional
 
#1

deklaration unterscheidet sich von vorheriger ?!?!?

  Alt 9. Sep 2004, 21:29



Delphi-Quellcode:
  TMyListView = class(TCustomListView)
  private
    FExtTypes: Boolean;
    FThumbnailThread: TThumbnailThread;
    FImageList: TImageList;
  protected
  public
    property ExtTypes: Boolean read FExtTypes write FExtTypes;
    property ImageList: TImageList read FImageList write FImageList;
    constructor Create(AOwner: TComponent); override;
    destructor Destroy; override;
    procedure TreeUpdate(NewRoot: PItemIDList);
    procedure ChangeBitmap(Bitmap: TBitmap; Index, Width, Heigth: Integer);
später im implemtationsteil: (mit STRG + SHIFT + C vervollständigt)
Delphi-Quellcode:
procedure TMyListView.ChangeBitmap(Bitmap: TBitmap; Index, Width, Heigth: Integer);
var
  ImageIndex: Integer;
begin
  ImageIndex := FImageList.Add(Bitmap, nil);
  FListView.Items[Index].ImageIndex := ImageIndex;
  FListView.Items[Index].Caption := Format('%s (%dx%d)',
  [FListView.Items[Index].Caption, Width, Height]);
end;
Fehlermeldung:
Deklaration von ChangeBitmap unterscheidet sich von vorheriger Deklaration
WIE BITTE ?!?!
Sebastian
  Mit Zitat antworten Zitat