Refactoring TTaskDialog: remove property ParentWindow (added in 61fefaa7), it's not longer needed.

This commit is contained in:
Bart 2023-07-22 16:03:50 +02:00
parent 85c1fff32d
commit 4442949a29
2 changed files with 0 additions and 5 deletions

View File

@ -629,7 +629,6 @@ type
FFooterText: TTranslateString;
FMainIcon: TTaskDialogIcon;
FModalResult: TModalResult;
FParentWindow: HWND;
FRadioButton: TTaskDialogRadioButtonItem;
FRadioButtons: TTaskDialogButtons;
FText: TTranslateString;
@ -648,9 +647,6 @@ type
public
FWidth: Integer; //ToDo: make this a readonly property, so we can use it in the TaskDlgEmulation unit.
property ParentWindow: HWND read FParentWindow;
constructor Create(AOwner: TComponent); override;
destructor Destroy; override;
function Execute: Boolean; overload; dynamic;

View File

@ -228,7 +228,6 @@ const
begin
//Current goal of refactoring: replace all this with:
//Result := TWSTaskDialogClass(WidgetSetClass).Execute(Self);
FParentWindow := ParentWnd;
//temporary show new, then old dialog, both in emulated mode (regardless of Flags)