setlength的用法 |
|
尚未結案
|
|
pricejit2
一般會員   發表：53 回覆：18 積分：14 註冊：2005-01-28 發送簡訊給我 |
|
|
deity
尊榮會員  發表：90 回覆：876 積分：678 註冊：2003-05-09 發送簡訊給我 |
您好：
setlength设置字串或数组的长度，可查看在线帮助或站内查找setlength
小弟写了两个实例，参考：
procedure TForm1.Button2Click(Sender: TObject);
var
s:string;
begin
s:='try try see';
setlength(s,2);
showmessage(s);
end; procedure TForm1.Button3Click(Sender: TObject);
var
a:array of integer;
i:integer;
begin
Memo1.lines.clear;
setlength(a,5);
for i:=low(a) to high(a) do
begin
a[i]:=i;
Memo1.lines.add(inttostr(a[i]));
end;
end;
============================
为什么经过多年以后，得失的过程如此冷漠
============================
|
|
pcplayer99
尊榮會員 發表：146 回覆：790 積分：632 註冊：2003-01-21 發送簡訊給我 |
引言: setlength的用法 可以舉個例子嗎SetLength可以对字符串，也可以拿来对动态array。详细的可以参考DELEPHI的Help 比如，我要把一个TStream里的内容搬到一个String里： AStream:TStream; S:string; 假设AStream里已经有Data了，我要把Data放进S里： SetLength(S,AStream.Size); //一定要先把S的长度设置好，否则后一句话会因为S的长度不够而出错。 AStream.Read(S[1],AStream.Size); 对于动态的ARRAY： 一般的array是这样声明的：MyIntArrar:array[0..100] of Integer. 但是，如果我不知道Array里会有多少个元素，我可以声明成动态的： MyIntArray: array of Integer; 然后，当你要用它，首先得设置它的长度： SetLength(MyIntArray,100)，然后才可以用MyIntArray[99]这个元素，否则肯定出错。 这时候，如果你需要MyIntArray[210]这个元素，你的元素的个数增加了，你可以再次设置长度为：SetLength(MyIntArray,220)，这样以前的元素都在，又增加了元素的个数。 对应的，想知道当前这个MyIntArray可以放多少个元素，就用Length(MyIntArray)来取。 |
發表時間：2005-08-02 14:57:33
IP:220.130.xxx.xxx 未訂閱
系統時間：2024-04-27 0:05:54
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |