summaryrefslogtreecommitdiff
path: root/UChown.pas
diff options
context:
space:
mode:
Diffstat (limited to 'UChown.pas')
-rw-r--r--UChown.pas6
1 files changed, 3 insertions, 3 deletions
diff --git a/UChown.pas b/UChown.pas
index 5e09809..0e95c44 100644
--- a/UChown.pas
+++ b/UChown.pas
@@ -116,7 +116,7 @@ begin
GroupFrame.AddControl(GroupListViewScrolledWindow);
FillData;
- OnKeyDown := FormKeyDown;
+ OnKeyDown := @FormKeyDown;
end;
procedure TFChown.FormKeyDown(Sender: TObject; Key: Word; Shift: TShiftState; var Accept: boolean);
@@ -156,8 +156,8 @@ begin
FileLabel.Caption := Format(LANGFChmod_FileLabel, [StrToUTF8(FileName), AttrToStr(Mode), AttrToOctal(Mode), susr, sgrp]);
FileLabel.UseMarkup := True;
if Length(FileName) > 20 then FileLabel.SetSizeRequest(200, -1);
- OwnerListView.OnSelectionChanged := OwnerListViewSelectionChanged;
- GroupListView.OnSelectionChanged := GroupListViewSelectionChanged;
+ OwnerListView.OnSelectionChanged := @OwnerListViewSelectionChanged;
+ GroupListView.OnSelectionChanged := @GroupListViewSelectionChanged;
end;
procedure TFChown.FillData;