From c343cfe0d3feb33474849f686c868b8ae1a9b9a5 Mon Sep 17 00:00:00 2001 From: Bart <9132501-flyingsheep@users.noreply.gitlab.com> Date: Mon, 24 Jul 2023 11:00:52 +0200 Subject: [PATCH] Refactoring TTaskDialog: remove some comments from TaskDialogEmulation unit. --- lcl/taskdlgemulation.pp | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lcl/taskdlgemulation.pp b/lcl/taskdlgemulation.pp index 215858f4e2..45a017d052 100644 --- a/lcl/taskdlgemulation.pp +++ b/lcl/taskdlgemulation.pp @@ -636,9 +636,9 @@ begin CustomButtons := TStringList.Create; for B in FDlg.Buttons do - CustomButtons.Add(B.Caption); //********** ModalResult and Default??? + CustomButtons.Add(B.Caption); Radios := TStringList.Create; - for B in FDlg.RadioButtons do //********** Default? + for B in FDlg.RadioButtons do Radios.Add(B.Caption); //ToDo