如果用以下代码只能实现长度不固定的字符串转换:
var
str: string;
arr: array of Char;
i: Integer;
begin
SetLength(arr, Length(str));
for i := Low(arr) to High(arr) do
arr[i] := str[i + 1];
end;
但是怎样才能实现它转换为长度固定的字符数组呢?
var
str: string;
arr: array of Char;
i: Integer;
begin
SetLength(arr, Length(str));
for i := Low(arr) to High(arr) do
arr[i] := str[i + 1];
end;
但是怎样才能实现它转换为长度固定的字符数组呢?
解决方案 »
- 如何在展开和合上时改变TTreeView节点图标?
- 时时检查是否连接Internet。(高分求救!!)
- dxDBTreeView中,增加记录时如何自定义ID的值?
- 哪位老大有直接将窗体上所有简体字转换成繁体字的控件啊。
- 如何从我的程序得到另外的一个外部EXE程序中StringGrid的内容?
- 如何在英文版的delphi6中添加新的类型库??
- 关于TreeView的问题
- 如何将*.Swf文件加到资源文件中。并且调用。
- 数据库高手请进: ADO 多表连接查询得到的RecordSet 怎样在新增时只插入其中一个表
- Timage能不能把一个bmp格式的图片装入后以jpg的格式压缩保存????
- 简单的fastreport打印问题-动态设计报表时为什么不能打印多页?
- 看完这么感慨,感慨造物主的伟大
var
str: string;
arr: array[0..255] of Char;
i: Integer;
begin
for i := 0 to length(str) do
arr[i] := str[i];
end;
var
str: string;
arr: array[0..255] of Char;
i: Integer;
begin
for i := 0 to length(str) do
arr[i] := str[i+1];
end;
还是非常感谢你!!!!!