FlexUI: fixed window scrollbars; nicer button pushing with keyboard

[d2df-sdl.git] / src / flexui / fui_common.pas

diff --git a/src/flexui/fui_common.pas b/src/flexui/fui_common.pas
index 0c809154051de215431d58616bb2a8d4bcf77b1e..b53311e043688f0d54a3caa1d1a22553da232e22 100644 (file)
--- a/src/flexui/fui_common.pas
+++ b/src/flexui/fui_common.pas
@@ -199,8 +199,11 @@ begin
   result.a := a;
 end;
 
-function TGxRGBA.toString (): AnsiString; begin result := formatstrf('rgba(%s,%s,%s,%s)', [r, g, b, a]); end;
-
+function TGxRGBA.toString (): AnsiString;
+begin
+  if (a = 255) then result := formatstrf('rgb(%s,%s,%s)', [r, g, b])
+  else result := formatstrf('rgba(%s,%s,%s,%s)', [r, g, b, a]);
+end;
 
 
 // ////////////////////////////////////////////////////////////////////////// //