嗯！作個 ListBox1, Button1
於 Button1's OnClick 事件中寫上
procedure TForm1.Button1Click(Sender: TObject);
var
i:integer;
begin
for i := 1 to 40000 do
begin
ListBox1.Items.Add(IntToStr(i));
end;
end;
測試環境為 Win2000 ，OK！
看了手冊，TListBox 的 Items.count 為 Integer .
Integer 在 16bit 環境下為 -32768-32767
我不知 95 下編譯出來的是 16bit 還是 32bit 的程式
如是 16bit 的，可能只能換其他控件或是
照 softprince 所述的方法了。
