284
284
OKButton.Name = 'OKButton'
286
285
OKButton.OnClick = OKButtonClick
287
286
HelpButton.Name = 'HelpButton'
289
287
HelpButton.OnClick = HelpButtonClick
290
288
CloseButton.Name = 'CloseButton'
292
289
CloseButton.Enabled = False
293
290
CancelButton.Name = 'CancelButton'
296
292
ShowButtons = [pbOK, pbCancel, pbHelp]