我正在使用德尔福6. 我想解码一个葡萄牙UTF-8编码的字符串到WideString,但我发现它不正确解码。 原文为"ANÁLISE8"。使用UTF8Decode()后,结果为"ANALISE8"。 "A"上方的符号消失。 下面是代码: var
f : textfile;
s : UTF8String;
w, test : WideString;
begin
我想实现一个类,其实例名为toto的属性是一个动态数组我可以追加,读取,写入像一个tlist。 我写这个: Tmodel = Class(TObject)
ftoto:array of single;
function gettoto(ind : integer):single
function gettotosize:integer;
proced