TRichEdit dynamisch erstellt, probleme

[DelTurbo]

Hi,

ich erstelle diverse TRichEdit. Klappt alles wunderbar. Aber sobald ich ScrollBars auf ssVertical setzte geht nix mehr. Das program steht. Es steht nicht sofort. Das wär ja zu einfach. Ich habe z.b. beispiel noch die möglichkeit eventuell 2x das tab zu wechseln. Dann steht es.

Vielleicht weiss ja einer was ich falsch mache.

Delphi-Quellcode:

      NewRichEdit:=TRichEdit.Create(NewTab);
      WinHnd[i-1]:=NewRichEdit;
      with NewRichEdit do begin
        Parent:=NewTab;
        Width:=NewTab.Width;
        Height:=NewTab.Height;
        Color:=$000044;
        Font.Color:=$FFFFFF;
        ReadOnly:=True;
        ScrollBars:=ssVertical;  //<-- wenn ich das rausnehem läuft das prg einwandfrei.
      end;

Danke im voraus

[hoika]

Hallo,

was passiert bei ssBoth ?

Was machst du noch im Form ?


Heiko

[DelTurbo]

Bei ssBoth passiert das gleiche. Bleibt stehen. In der Form selber werden nur PageControls und TabSheets erstellt. In dem TabSheet dann das RichEdit.

Also ich kann mir das nicht erklären. Achso, von einem unabhängigen Thread wird noch die farbe auf $000000 gesetzt. Aber es scheppert erst "wesentlich" später.

[hoika]

Hallo,

Delphi-Quellcode:

Achso, von einem unabhängigen Thread wird noch die farbe auf $000000 gesetzt. Aber es scheppert erst "wesentlich" später.

Aha, Threads.
Schon eine Fehlerquelle gefunden.

Was passiert, wenn der Thread nicht läuft ?
Benutzt du Synchronize ?


Heiko

[DelTurbo]

Uff, stimmt. Ich nehme nur das Handle und "prokel" drauf rum. PostMessage hatte in dem Test-Prog genommen.

Ich werd das mal ändern und berichten.

Erstmal danke

[DelTurbo]

Rückmeldung bevor ich es vergesse. Nehme ich das setzen der Farbe raus klappt alles. Morgen bau ich wieder die PostMessage ein und gebe eine Definitive rückmeldung......

[DelTurbo]

Rückmeldung:

Es lag daran das ich kein PostMessage verwendet hatte. Nun mit Postmessage läuft es.

Danke für den stubs in die richtige richtung ;)