CnPack Forum

#1 问一个和专家包不相关的问题
在其他的几个论坛发了贴，没人答复，来这里试试。

procedure TForm1.Button1Click(Sender: TObject);
var
t: TRttiOrdinalType;
begin
Memo1.Clear;

//先从类型名获取类型信息对象
t := TRttiContext.Create.GetType(TypeInfo(Byte)) as TRttiOrdinalType;
Memo1.Lines.Add(Format('%s - %s', [t.Name, t.QualifiedName]));
Memo1.Lines.Add(Format('Size: %d', [t.TypeSize]));
Memo1.Lines.Add('QualifiedName: ' + t.QualifiedName);
Memo1.Lines.Add(Format(' ..

#1 >>Next Page

Forum:CnPack IDE 专家包（CnW ...
Thread:问一个和专家包不相关 ...
Next Thread:代码输入提示问题！ ...

Home
Login

Powered by Discuz!