PageControl comctl32 Problem

[punker76]

Tag auch...

Habe ein riesiges Problem mit dem Pagecontrol. (Delphi 5 mit Update 1 und 2, Windoof 2000 mit allen Servicepacks)
(bei Windoof XP passiert das nicht)

Problem:

Habe ein PageControl erzeugt:

Delphi-Quellcode:

  Page      := TPageControl. Create (self);
  Page. Align   := alClient;
  Page. TabStop   := FALSE;
  Page. MultiLine:= TRUE;
  Page. Parent   := self;

Nun werden mehrer Sheets darauf angelegt:

Delphi-Quellcode:

  MySheet         := TTabSheet. MyCreate (Page);
  MySheet. Parent      := Page;
  MySheet. PageControl      := Page;
  MySheet. Align      := alClient;

bei dieser Zeile bekomme ich folgenden Fehler:
  MySheet. PageControl      := Page;

Zitat:

Im Projekt ... ist eine Exception der Klasse EAccessViolation aufgetreten. Meldung: 'Zugriffsverletzung bei Adresse ... in Modul 'comctl32.dll'. Lesen von Adresse ...'. usw.

Call stack:
:71756AA0 [comctl32.dll]
:71756B25 [comctl32.dll]
:71714867 [comctl32.dll]
:71714911 [comctl32.dll]
:7171364D [comctl32.dll]
:77E01EF0 [user32.dll]
:77E03D1E [user32.dll]
:77E03D9A [user32.dll]
:0043699B [....exe] Controls.TWinControl.DefaultHandler
:004364C3 [....exe] Controls.TWinControl.MainWndProc
:00448716 [....exe] Forms.StdWndProc
:77E01EF0 [user32.dll]
:77E03523 [user32.dll]
:77E06015 [user32.dll]
:0045CC4C [....exe] Comctrls.TCustomTabControl.GetDisplayRect
:004357F9 [....exe] Controls.TWinControl.AlignControl
:00435853 [....exe] Controls.TWinControl.Realign
:004364C3 [....exe] Controls.TWinControl.MainWndProc
:00448716 [....exe] Forms.StdWndProc
:77E01EF0 [user32.dll]
:77E03523 [user32.dll]
:77E06015 [user32.dll]
:0045D15A [....exe] Comctrls.TCustomTabControl.TabsChanged
:00412E1E [....exe] Classes.TStrings.InsertObject
:0045DFC1 [....exe] Comctrls.TPageControl.InsertTab
:0045D8B3 [....exe] Comctrls.TTabSheet.SetTabShowing

wenn ich das hier mache bekomme ich den Fehler nicht:
  Page. MultiLine:= FALSE; Ich brauche dringend Hilfe.