delphi遇到新问题,Cardinal是编码类型。我需要多个
例如:procedure TForm7.Button3Click(Sender: TObject);
var
a1: Cardinal;
begin
a1 := 65001;
RichViewEdit1.SaveText('c:\Hello1.txt', 0, a1);
//这里有三个参数: 参数1是一个文件名,参数2是-符号的宽度(整型),参数3是编码
注:65001是utf-8
end;
问题来了1个a1不够用。。我需要定义多个咋办?有简单方法么?{:301_974:}
嗯,我只能format一下,是吧? var
a:array of cardinal;
for i:=1 to 10 do begin
do(a);
end;
页:
[1]