summaryrefslogtreecommitdiff
path: root/libgtk_kylix/GTKDialogs.pas
diff options
context:
space:
mode:
Diffstat (limited to 'libgtk_kylix/GTKDialogs.pas')
-rw-r--r--libgtk_kylix/GTKDialogs.pas2
1 files changed, 2 insertions, 0 deletions
diff --git a/libgtk_kylix/GTKDialogs.pas b/libgtk_kylix/GTKDialogs.pas
index 4a9b892..e6e5c7e 100644
--- a/libgtk_kylix/GTKDialogs.pas
+++ b/libgtk_kylix/GTKDialogs.pas
@@ -127,6 +127,7 @@ end;
function TGTKFileSelectionDialog.GetShowFileOpButtons: boolean;
var b: Boolean;
begin
+ b := False;
g_object_get(FWidget, 'show-fileops', @b, nil);
Result := b;
end;
@@ -191,6 +192,7 @@ end;
function TGTKColorSelectionDialog.GetColor: TGDKColor;
var Col: gdk2.TGDkColor;
begin
+ FillChar(Col, sizeof(gdk2.TGDkColor), 0);
gtk_color_selection_get_current_color(PGtkColorSelection(PGtkColorSelectionDialog(FWidget)^.colorsel), @Col);
Result := PGdkColorToGDKColor(@Col);
end;