Question

Delphi 变量打开窗体

var
A:Array of Array of String;
aa:TForm;
bb:String;
begin
ADOQuery2.SQL.Clear;
ADOQuery2.SQL.Add('Select 名称 from 窗体 where 标题 = "'+ TreeView1.Selected.text +'" ');
ADOQuery2.Open;
A :=ADOQuery2.Recordset.GetRows(ADOQuery2.RecordCount,0, EmptyParam);

bb:= 'Form' +A [0,0];
aa:= TForm(FindComponent(bb));

TForm(FindComponent(bb)).sHow;

end;
真实不知道问题在哪，运行到最后一句就出错，请大神帮忙看看，或是有其他方法，跪求

若以下回答无法解决问题，邀请你更新回答

Answer 1

窗体没有初始化

追问

bb:= 'Form' +A [0,0];
TForm(Application.FindComponent(bb)).show;
改成这个就没问题了，自己试出来的希望队大家有帮助