type TDlgBase = class(TFrmBase)
TFrmBase
btnCancel
btnHelp
btnOk
pnlBottom
pnlClient
procedure InsertTexts(); override;