R ranxg Unregistered / Unconfirmed GUEST, unregistred user! 2005-02-27 #1 如 a[1]=8 a[2]=120 ...a[25]=38... 现知道 结果值是a=120 怎么写出求出i的代码? 马上结帐!
R ranxg Unregistered / Unconfirmed GUEST, unregistred user! 2005-02-27 #2 如 a[1]=8 a[2]=120 ...a[25]=38... 现知道 结果值是a=120 怎么写出求出i的代码? 马上结帐!
C chinaandys Unregistered / Unconfirmed GUEST, unregistred user! 2005-02-28 #5 for I:=Low(a) to High(a) do begin Listbox1.items.add(inttostr(a)): end;
X xmcccc Unregistered / Unconfirmed GUEST, unregistred user! 2005-02-28 #6 function GetArrIndex(Const Value:integer):integer; var I:integer; begin Result:=-1; for I:=Low(a) to High(a) do begin if a=Value then begin Result:=I; Break; end; end; end;
function GetArrIndex(Const Value:integer):integer; var I:integer; begin Result:=-1; for I:=Low(a) to High(a) do begin if a=Value then begin Result:=I; Break; end; end; end;