文件读写问题,请帮忙

newqq 2010-09-20 09:36:24

我有一个gs.dat文件,内容是这样的:
GS,IP,book
公司A,192.168.1.1,DB1
公司B,192.168.1.2,DB2
公司C,192.168.1.3,DB3

此文件的格式就是这样的而且不能更改,请问我怎么将此文件的内容读到ComboBox1里面,谢谢!

...全文

168 14 打赏收藏转发到动态举报

写回复

用AI写文章

14 条回复

切换为时间正序

请发表友善的回复…

发表回复

newqq 2010-09-20

打赏
举报

还补充下,我这个是要连接数据库的,怎么按逗号将其分隔开

newqq 2010-09-20

打赏
举报

对了,还请教下,怎么给ComboBox1增加一个默认值"请选择"

白耗子 2010-09-20

打赏
举报

楼上正解
亦可以查找 Item 中是否含有 ‘IP' 然后把它删除保险一些

newqq 2010-09-20

打赏
举报

谢谢,可以了

喝口水 2010-09-20

打赏
举报

发了两个错了，这个是正确的
procedure TForm1.FormCreate(Sender: TObject);
begin
ComboBox1.Items.LoadFromFile(ExtractFilePath(Application.ExeName)+'gs.dat');
ComboBox1.Items.Delete(0);
end;

喝口水 2010-09-20

打赏
举报

procedure TForm1.FormCreate(Sender: TObject);
begin
ShowMessage(ExtractFilePath(Application.ExeName)+'\gs.dat');
ComboBox1.Items.LoadFromFile(ExtractFilePath(Application.ExeName)+'gs.dat');
ComboBox1.Items.Delete(0);
end;

喝口水 2010-09-20

打赏
举报

procedure TForm1.FormCreate(Sender: TObject);
begin
ComboBox1.Items.LoadFromFile(ExtractFilePath(Application.ExeName)+'\gs.dat');
ComboBox1.Items.Delete(0);
end;

newqq 2010-09-20