diff options
| author | Tomas Bzatek <tbzatek@redhat.com> | 2025-01-04 20:41:26 +0100 |
|---|---|---|
| committer | Tomas Bzatek <tbzatek@redhat.com> | 2025-11-27 21:42:57 +0100 |
| commit | 90db8b6652f73ddc335922d3a7c593878d83c45e (patch) | |
| tree | 6b3f8ed57d4dc3358c2965bf41f6e613b8b80bf0 /libgtk_kylix/GTKDialogs.pas | |
| parent | 63ff1bea9bb1e87a7e2643f680d04f2b9c00d072 (diff) | |
| download | tuxcmd-90db8b6652f73ddc335922d3a7c593878d83c45e.tar.xz | |
Basic ListView CSS styling
Diffstat (limited to 'libgtk_kylix/GTKDialogs.pas')
| -rw-r--r-- | libgtk_kylix/GTKDialogs.pas | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/libgtk_kylix/GTKDialogs.pas b/libgtk_kylix/GTKDialogs.pas index dfbe1b2..ff8a0b0 100644 --- a/libgtk_kylix/GTKDialogs.pas +++ b/libgtk_kylix/GTKDialogs.pas @@ -135,7 +135,7 @@ end; function TGTKColorButton.GetColor: string; var c: TGdkRGBA; begin - FillChar(c, sizeof(TGdkRGBA), 0); + Initialize(c); gtk_color_chooser_get_rgba(PGtkColorChooser(FWidget), @c); Result := string(gdk_rgba_to_string(@c)); end; @@ -149,7 +149,8 @@ end; procedure TGTKColorButton.SetDefaultColor; begin - gtk_color_chooser_set_rgba(PGtkColorChooser(FWidget), nil); + // No way to reset the widget to an empty state, just set grey + SetColor('#EEEEEE'); end; (********************************************************************************************************************************) |