|
|
Screenshot from 2019-02-02 23-44-32.png (323,547 bytes) |
|
|
The following code under compiler directive in pu_planetinfo.pas makes the problem. If removed, all is shown fine: procedure Tf_planetinfo.FormCreate(Sender: TObject); begin {$ifdef lclgtk2} if not DarkTheme then begin Color:=clBlack; Font.Color:=clWhite; end; {$endif} ... |
|
|
If you remove this code all the control on the right and top use the default theme color and appear in gray. The goal was to have the full window with black background, even if this only work with gtk2. The origin of the problem is my yesterday change when I added the size constraint for the two combobox in this form. For a unknown reason Lazarus decided to set ParentFont=false in the lfm but let ParentColor=true. I check more in detail the diff for this change to see if this affect other part of the program. |
|
|
I set again ParentFont=true and this fix the problem. This is the default value in property editor so this effectively remove ParentFont=false in the lfm. There must not be other problem elsewhere in the program because all the other forms use the default theme color. |
- Anonymous
