如何把字符型变量转换为类(50分)

  • 主题发起人 主题发起人 lifchina
  • 开始时间 开始时间
L

lifchina

Unregistered / Unconfirmed
GUEST, unregistred user!
如何把:'Tform'装换为Tform来使用。谢谢
 
给你看一例子:
procedure TForm1.Button1Click(Sender: TObject);
var
i: Integer;
const
NamePrefix = 'MyEdit';
begin
for i := 1 to 20 do begin
TEdit.Create(Self).Name := NamePrefix + IntToStr(i);
with TEdit(FindComponent(NamePrefix + IntToStr(i))) do
begin
Left := 10;
Top := i * 20;
Parent := self;
end;
end;
end;
 
有人用过getclass生成类么?
class of是怎么用的?
 
多人接受答案了。
 
后退
顶部