B
Bear
Unregistered / Unconfirmed
GUEST, unregistred user!
l的声明
type list=record
vec:integer;
len:integer;
end;
var l:list;
在delphi中如何实现?
type list=record
vec:integer;
len:integer;
end;
var l:list;
在delphi中如何实现?
B
BiJ
Unregistered / Unconfirmed
GUEST, unregistred user!
什么意思
直接给就行了
Example:
var i,j:integer;
begin
l.vec:=i;
l.len:=j;
end;
直接给就行了
Example:
var i,j:integer;
begin
l.vec:=i;
l.len:=j;
end;
茶
茶叶蛋
Unregistered / Unconfirmed
GUEST, unregistred user!
l.vec := 1;
l.len := 2;
茶
茶叶蛋
Unregistered / Unconfirmed
GUEST, unregistred user!
有这么简单吗?
我真是不敢相信自己.
我真是不敢相信自己.
B
Bear
Unregistered / Unconfirmed
GUEST, unregistred user!
问题是将一串整数值怎样通过程序输入、再赋值给L变量。
C
CJ
Unregistered / Unconfirmed
GUEST, unregistred user!
while i<count
begin
l.vec:=arry1
l.len:=arry1[i+1];
i:=i+2;
end;
begin
l.vec:=arry1
l.len:=arry1[i+1];
i:=i+2;
end;
S
sherman
Unregistered / Unconfirmed
GUEST, unregistred user!
程序输入可以用EDIT框，再l.ven := StrToInt(edit1.text);
W
WebBar
Unregistered / Unconfirmed
GUEST, unregistred user!
哗！天哪，这么简单的问题？O，我又落后了...
吹毛求疵一下：
l.ven := StrToInt(Trim(edit1.text))
是不是象孔乙己的“茴香豆有四种写法”？不好意思。呵呵...说句真的：
加个 try ... except 吧 !!
吹毛求疵一下：
l.ven := StrToInt(Trim(edit1.text))
是不是象孔乙己的“茴香豆有四种写法”？不好意思。呵呵...说句真的：
加个 try ... except 吧 !!
B
BiJ
Unregistered / Unconfirmed
GUEST, unregistred user!
为什么不早说?!!!!!!!!!!!!!!!!!!!!!
BIJ气愤的说.
补充:
strtoint可以将str转化为int.
B
Bear
Unregistered / Unconfirmed
GUEST, unregistred user!
我原想用DELPHI来编译PASCAL的程序，但是不能将数据传进去到此问题结束了！
B
Bear
Unregistered / Unconfirmed
GUEST, unregistred user!
多人接受答案了。