[Solved] GetWindowManager value is wrong

[AlexTP]

I made small demo to see GetWindowManager result string. It gives string of 6-7 Chinese symbols here in the demo! Why? I use latin Ubuntu 20.04 x64 with Gnome.

Code: Pascal  [Select][+][-]

1. implementation
2.  
3. uses gtk2int;
4.  
5. {$R *.lfm}
6.  
7. { TForm1 }
8.  
9. procedure TForm1.FormCreate(Sender: TObject);
10. begin
11.   caption:= 'wm: '+GTK2WidgetSet.GetWindowManager;
12. end;    
13.  

Lazarus 3.99 (rev main_3_99-33-gcb65d62758) FPC 3.2.3 x86_64-linux-gtk2

[zeljko]

I've maded change of wm name yesterday in trunk, changed PWideChar to PChar ... can you check inside GetWindowManager if PWideChar need to be returned back ?

[zeljko]

Juha created bug with https://gitlab.com/freepascal.org/lazarus/lazarus/-/commit/db2bca39494aed99664abf76990a26a635e8beb4 , 3 months ago, I've fixed it yesterday, also added to merge list for 3.0RC2.

[AlexTP]

I used not last Lazarus! If I change PWideChar() to PChar(), then I get OK name 'gnome shell'.
Must be in .GetWindowManager:

Code: [Select]

            if (typeReturned = WMAtom) and (formatReturned = 8) then
              Result := LowerCase(StrPas(PChar(Data)));


[zeljko]

As I sad it's fixed yesterday and merged to fixes_3_0