Make most "btnCancelClick" procedures superflous by assigning the correct ModalResult (mrCancel) to the relevant cancel buttons.

2026-03-13 09:24:25 +08:00 · 2008-03-09 20:27:12 +00:00
parent 9618ac94b3
commit 38caa4cd99
16 changed files with 5 additions and 52 deletions
--- a/source/insertfiles_progress.dfm
+++ b/source/insertfiles_progress.dfm
@@ -73,6 +73,7 @@ object frmInsertFilesProgress: TfrmInsertFilesProgress
    Width = 75
    Height = 25
    Caption = 'Cancel'
+    ModalResult = 2
    TabOrder = 1
    OnClick = Button1Click
  end