diff options
Diffstat (limited to 'USplitFile.pas')
| -rw-r--r-- | USplitFile.pas | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/USplitFile.pas b/USplitFile.pas index 6ba6065..39e9505 100644 --- a/USplitFile.pas +++ b/USplitFile.pas @@ -22,7 +22,7 @@ unit USplitFile; interface uses - SysUtils, Types, Classes, Variants, GTKControls, GTKForms, GTKStdCtrls, GTKExtCtrls, GTKConsts; + SysUtils, Classes, GTKControls, GTKForms, GTKStdCtrls, GTKConsts; type TFSplitFile = class(TGTKDialog) @@ -98,7 +98,7 @@ begin Box.AddControlEx(SizeBox, False, False, 0); DeleteTargetCheckBox := TGTKCheckButton.CreateWithLabel(Self, LANGDeleteFilesOnTargetDisk); Box.AddControlEx(DeleteTargetCheckBox, False, False, 3); - OnKeyDown := FormKeyDown; + OnKeyDown := @FormKeyDown; Entry.SetFocus; end; |