如何读取文本文件中的内容到combobox控件中(0分)

K

kitty_li

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-02-02

• #1

如
aa
bb
cc

 

A

abcdman

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-02-02

• #2

procedure TForm1.btn1Click(Sender: TObject);
var
strlist:TStringList;
begin
strlist :=TStringList.Create;
try
strlist.LoadFromFile('aa.txt');
combobox1.Items.Assign(strlist);
except
FreeAndNil(strlist);
end;
end;
哈哈,这种方法挺简单的吧

 

D

delhpi

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-02-02

• #3

Combobox1.Items.LoadFromFile(YourTextFileName.txt);


=====================
2楼的用

try

finally

end

是否更合适？

 

K

kitty_li

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-02-02

• #4

不错，不错，谢谢两位

 

A

abcdman

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-02-02

• #5

哈哈,是写错了.
3楼的说的对, 可以直接用这个语句,简单.
Combobox1.Items.LoadFromFile(YourTextFileName.txt);
items:Tstrings类型,本身就有读文件函数.唉...

 

K

kitty_li

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-02-02

• #6

请教上面两位，将.txt文件中读取内容显示在combobox中，combobox可以Edit，最后写入.txt文件。（要求：新输入combobox中的text，通过判断排除重复）
用strlist:TStringList;可以实现，有没更好的方法。

 

P

Passion

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-02-02

• #7

TStringList有个Duplicates属性吧。lz试一试。

 

I

icerecall

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-02-02

• #8

if OpenDialog1.Execute then
ComboBox1.Items.LoadFromFile(OpenDialog1.FileName);