这是我的代码:
var
aChar,temp : char ;
test : string ;
k : integer ;
begin
K := 1 ;
test := edit1.Text ;
for k := 1 to 10 do
temp := test[k] ;
aChar := upcase(Temp) ;
richEdit1.Lines.Add(aChar);
richEdit1.Lines.Add(#13) ;
end;
出于某种原因,它返回随机值,例如 # 和 T 但我已经初始化了它们?任何人都可以弄清楚请让我知道,因为我明天会写这些东西。