Pascal Project Manager & Editor

[Harry Stahl]

Da gibt es wohl ein Problem mit den Styles. Habe ich nun so gelöst, indem ich die option Client für stylessettings deaktiviere und alle sections nun selber male.

Aber ein anderes Problem: Wie macht man es, dass in ein RTF-Feld eingegebener Text, z.B. bei Nutzung des Windows-Styles dann auch später, wenn man in einen Style umschaltet, richtig angezeigt wird.

Ich habe es mit clWindowText und clDefault (also "RTF.SelAttributes.color := clDefault;") versucht, aber wenn ich dann in den Style wechsle, ist der Text nicht weiß (wie bei Carbon erwartet) sondern, leicht gräulich.

Edit: Habe zwar das gefunden: RTF.DefAttributes.Color := TStyleManager.ActiveStyle.GetStyleFontColor(sfEdit BoxTextNormal);

Aber dann ist der ganze Font weiß und farbliche Text-Markierungen werden ignoriert. Das ist also auch keine Lösung.

Werde daher notgedrungen bei den Stylesettings sefont und seclient rausnehmen, d.h. bei jedem Style ist der Hintergrund dann weiß und Text schwarz oder farbig...