表单显示在Delphi 10中的父标签页之外

时间:2017-03-15 12:40:12

标签: delphi delphi-10.1-berlin

我在Delphi 10中编写了以下代码:

FExportWizardFolderSelectionForm := TExportWizardFolderSelection.Create(nil);  
FExportWizardFolderSelectionForm.Parent := tabSheetFolderSelection;
FExportWizardFolderSelectionForm.Align := alClient;  
FExportWizardFolderSelectionForm.BorderStyle := bsNone;  
FExportWizardFolderSelectionForm.Visible := False;

此代码适用于Delphi 2006,但在Delphi 10中,Form显示在Tabsheet之外。在不更改代码的情况下,它在两个版本中的工作方式都不同。

在Delphi 10中正确运行此表单需要哪些修改/附加代码?

image

2 个答案:

答案 0 :(得分:1)

唯一合理的解释是您将nil指定为表单的Parent。大概是因为tabSheetFolderSelectionnil

首先进行一些调试以确认该假设。然后,您需要检查其余代码,以了解tabSheetFolderSelectionnil的原因。

答案 1 :(得分:-3)

在设计模式下为FExportWizardFolderSelectionForm表单设置BorderStyle属性:= bsSingle