Delphi:以2种不同的形式显示相同的图形

时间:2011-02-23 20:38:42

标签: delphi delphi-2009 pascal teechart

我想在两种不同的形式上显示相同的图形(TChart)。在第一个版本中有一个小版本,但我希望用户能够点击一个按钮来显示更大版本的图形。

1 个答案:

答案 0 :(得分:1)

您可以使用两个不同的控件来提供相同的数据集。 或者您可以尝试在新表单上设置控件的父级。

TSmallForm = class
...
procedure TSmallForm.Button1Click(sender : TObject)
var
  F : TForm;
begin
  F := TForm.Create;
  try
    ChartComponent.Parent := F;
    ChartComponent.Align := alClient;
    F.ShowModal;
  finally
    F.Free;
  end;
end;