uses .. InterfaceBase...function OSVersion: String;begin Result:={$I %FPCTARGETOS%}+'-'+{$I %FPCTARGETCPU%}+' ('+WidgetSet.ClassName+')';end;
cross-platform, multiwidgetset and multiarchitecture. Write once, compile everywhere. That u can see in the code.