Question

delphi中怎样输出记录型变量

Answer 1

type
TMyRecord = record
param1:Integer;
param2:Integer;
parame3:string;
//....
end;

function GetMyRecord: TMyRecord;
begin
//...
result.param1 := 1;
result.param2 := 2;
result.param3 := 'my record';
end;

追问

要用showmessage输出，怎么弄啊！谢谢哈

追答

showmessage只能输出字符串，或者把其他变量转换成字符串输出。记录包含多个变量，怎么showmessage啊，除非逐个输出。

showmessage(InttoStr(result.param1));
showmessage(InttoStr(result.param2));
showmessage(result.param3);

Answer 2

user:=edit1.Text;

Answer 3

showmessagefmt('%d,%s,%s',[m_record.param1,m_record.param2,m_record.param3]);

Answer 4

adotable1.count