to ruihuahan: 如果我要 engName的值是'0123456789ABCDEF',我賦這樣一個值,難道隻能循環16次去一一賦值嗎? 我想要一種更簡單的方法?
var i: integer begin for i := 0 to 99 do engName[i] := Name; end;
string类型不是可以做为CHAR[]来处理吗,倒过来行吗
strpcopy(@engName,'0123456789ABCDEF');
StrPCopy copies Source into a null-terminated string Dest. It returns a pointer to Dest.StrPCopy does not perform any length checking. The destination buffer must have room for at least Length(Source)+1 characters.
strpcopy(@engName,'0123456789ABCDEF'); 或用数组 var str1:string; i:integer; begin i:=0;str1:='0123456789ABCDEF'; while (str[i]<>'F') do //应该不为‘\0',只是针对这道题 begin engname[i]:=str[i]; i:=i+1; end; i:=i+1; engname[i]:=str[i]; end;
如果我要
engName的值是'0123456789ABCDEF',我賦這樣一個值,難道隻能循環16次去一一賦值嗎?
我想要一種更簡單的方法?
i: integer
begin
for i := 0 to 99 do
engName[i] := Name;
end;
或用数组
var str1:string;
i:integer;
begin
i:=0;str1:='0123456789ABCDEF';
while (str[i]<>'F') do //应该不为‘\0',只是针对这道题
begin
engname[i]:=str[i];
i:=i+1;
end;
i:=i+1;
engname[i]:=str[i];
end;