比如说:
with TForm2.Create(self) do
Show;
可以创建一个窗体,可是我只知道这个类的字符串形式procedure TForm1.Button1Click(Sender: TObject);
var
aFormClassStr: string;
begin
aFormClassStr := 'TForm2';
//请问如何把这个窗体创建出来?
end;
with TForm2.Create(self) do
Show;
可以创建一个窗体,可是我只知道这个类的字符串形式procedure TForm1.Button1Click(Sender: TObject);
var
aFormClassStr: string;
begin
aFormClassStr := 'TForm2';
//请问如何把这个窗体创建出来?
end;
GetClass('TForm2').Create