Mehrere Listboxen

[EWeiss]

Soooo...
Jetzt werden meine Properties gehalten.
Keine Ahnung was mich da geritten hat mit dem Record.

Delphi-Quellcode:

  public
    property Handle: HWND read GetHandle write FHandle;
    property AktForecolor: COLORREF read GetAktForecolor write FAktForecolor;
    property InAktForecolor: COLORREF read GetInAktForecolor write FInAktForecolor;
    property Backcolor: COLORREF read GetBackcolor write FBackcolor;
    property ShadowColor: COLORREF read GetShadowColor write FShadowColor;
    property ForeColorSelected: COLORREF read GetForeColorSelected write FForeColorSelected;
    property BackColorSelected: COLORREF read GetBackColorSelected write FBackColorSelected;
    property ShadowOffset: Integer read GetShadowOffset write FShadowOffset;
    property PointSize: Integer read GetPointSize write FPointSize;
    property DrawStyle: Integer read GetDrawStyle write FDrawStyle;
    property BorderStyle: Integer read GetBorderStyle write FBorderStyle;
    property Left: Integer read GetLeft write FLeft;
    property Top: Integer read GetTop write FTop;
    property Width: Integer read GetWidth write FWidth;
    property Height: Integer read GetHeight write FHeight;
    property Shadow: Boolean read GetShadow write FShadow;
    property ListItemHeight: Integer read GetListItemHeight write FListItemHeight;
    property ListFont: HFONT read GetListFont write FListFont;
    property Icon: string read GetIcon write FIcon;
    constructor Create(hOwner: HWND; FullpathImageName: string; x, y, xW, yH,
      ListID: integer; Visible: Boolean; ItemHeight: Integer; BackColor: COLORREF);
    destructor Destroy; override;

Danke euch..
Und wieder ein Problem weniger.

PS:
Durch die änderung habe ich auch das problem mit dem Beenden der Anwendung bereinigt.
to many error
Die Listboxen konnten nicht beendet werden weil sie alle ein Falsches Handle hatten.

gruss