5,388
社区成员
发帖
与我相关
我的任务
分享急，毕业设计，数据转化的问题。
那位大侠救救我。我遇到一个很白痴，很白痴的问题。（把我当白痴吧！！！）我竟然不知道怎么转化数据了。事情是这样的。
我定义了如下数据。
var
timeArray:array[0..7]of char;
timestr:string;
我现在要把timeArray[0]赋值给timestr，应该怎么转化？？？用什么语句。
要出人命了。
我定义了如下数据。
var
timeArray:array[0..7]of char;
timestr:string;
我现在要把timeArray[0]赋值给timestr，应该怎么转化？？？用什么语句。
要出人命了。
...全文
请发表友善的回复…
发表回复
sidachen 2002-05-27
- 打赏
- 举报
谢谢各位，我突然发现不是赋值的问题，是控件的关系。我决定不用listbox了。再次说声谢谢。（真的是个很白痴的问题。）
sidachen 2002-05-26
- 打赏
- 举报
随便说下，我用的是盗版的delphi60。不知道有没有问题？
sidachen 2002-05-26
- 打赏
- 举报
真的？具体是这个样子的，我定义了一个字段用来存储一个字符串，用来表示一个星期的课程安排，比如‘2010000’表示，星期一第二节课，和星期三第三节课，就是说按字符串的位数表示。我想在listbox显示。直接就是不行的呀。我回去试试看。
hao_yufei 2002-05-26
- 打赏
- 举报
我乍就可以
procedure TForm1.BitBtn1Click(Sender: TObject);
var
s: String;
a: array[0..7] of char;
begin
a[0] := 'a';
s := a[0];
showMessage(s);
end;
procedure TForm1.BitBtn1Click(Sender: TObject);
var
s: String;
a: array[0..7] of char;
begin
a[0] := 'a';
s := a[0];
showMessage(s);
end;
sidachen 2002-05-26
- 打赏
- 举报
没有那么简单呀，直接等根本同不过编译，提示类型不同。
dingsean 2002-05-26
- 打赏
- 举报
直接等于就行啦！！！
hao_yufei 2002-05-26
- 打赏
- 举报
同outer2000(天外流星)，直接等就可以了
tangyong_delphi 2002-05-26
- 打赏
- 举报
UP
cxx1997 2002-05-26
- 打赏
- 举报
setlength(timestr,7);
for i:=1 to 7 do
timestr[i]:=timearray[i-1];
for i:=1 to 7 do
timestr[i]:=timearray[i-1];
outer2000 2002-05-26
- 打赏
- 举报
老大，直接等不可以吗？
TIMESTR：=TIMEARRAY[0]
TIMESTR：=TIMEARRAY[0]
netlib 2002-05-26
- 打赏
- 举报
直接这样就可以了 Timestr:=timearray;
