用什么方法能给listbox的行数做限定? listbox.items.loadfromfile(...)我现在只想将某文件的头10行显示在listbox中,各位大侠帮忙看看!!! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 var I: Integer;begin with TStringList.Create do try LoadFromFile('c:\temp\temp.txt'); ListBox1.Clear; for I := 0 to 10 - 1 do begin if I >= Count then Break; ListBox1.Items.Add(Strings[I]); end; finally Free; end;end; if list.Items.Count> i thenbeginend 依然是多线程的问题 汗!现在在杭州招 Delphi 好少 两个数据库的拷贝数据? 我想这样定义两个类?A 要包含一个B 类,B也要包含一个A类?如何定义? 放分200——冰天雪地~!前空翻180度加后空翻90度最后头部着地~!!支持WGYKING(修罗是谁?!)做语言基础斑竹!!!! 如何用线程对同一数据库进行写入和查询等操作 如何给日期字段赋空值 一个关于FTP的问题! TStringGrid控件的使用 有关于canvas的 我想请问一下: 各位在设计界面的时候,一般都采用“什么字体?”, “什么字号?” 小弟想做一个类似QQ的通讯工具,不知道各位有没什么好的控件推荐(主要是用于界面的)?
I: Integer;
begin
with TStringList.Create do try
LoadFromFile('c:\temp\temp.txt');
ListBox1.Clear;
for I := 0 to 10 - 1 do begin
if I >= Count then Break;
ListBox1.Items.Add(Strings[I]);
end;
finally
Free;
end;
end;
then
begin
end