大哥们在帮助一下小妹！！！！！！！！！！找好用的记账软件

销售管理软件版1楼: 把一个文本文件11.txt格式是
kjdkdjk
djkfdlk
dsfjkjdf
一条一条的记录怎么导入combobox中。

2楼: unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;

type
TForm1 = class(TForm)
ComboBox1: TComboBox;
procedure FormCreate(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
var
i : Integer;
sl : TStringList;
begin
ComboBox1.Clear;
sl := TStringList.Create;
sl.LoadFromFile( ＇＇D:＼1.txt＇＇ );
for i := 0 to sl.Count - 1 do
ComboBox1.AddItem( sl.Strings[i], Nil );

ComboBox1.ItemIndex := 0;
end;

end. 如药品进销存管理

3楼: 和刚才一样读出来

在用
combobox1.Items.Append();
循环加进去就行了
加之前先
Clear;

看你的帖子让我想起来电影《大腕》里的一句台词：

下辈子做女人挺好！

呵呵

4楼: procedure TForm1.Button1Click(Sender: TObject);
begin
ComboBox1.Items.LoadFromFile(＇＇c:＼11.txt＇＇);
end;

5楼: 楼上的两种方法都可以

6楼: 非常感谢大家了。

销售管理软件版7楼: 途中借鉴

8楼: var
i : Integer;
sl : TStringList;
begin
ComboBox1.Clear;
sl := TStringList.Create;
try
sl.LoadFromFile( ＇＇D:＼1.txt＇＇ );
for i := 0 to sl.Count - 1 do
ComboBox1.Items.Add(sl.Strings[i]);
finaly
sl.Free;
end;

9楼: 不错，又学到东西了，呵呵

10楼: 直接加也可以啊!

11楼: 我也学到东西了。哈哈

12楼: good
看了确实有好处如好用的记账软件

13楼: 我刚学看得我云里雾里的马马虎虎可以看明白让我写就不一定可以写出来了哟

销售管理软件版14楼: 大哥大姐们我试了一下我怎么就读不进去呀看不到任何结果呀

请你们指教一下谢谢了~~！

15楼: 现在小妹怎么这么多啊!!!!!1

16楼: 对于我们来说你们都是我们的前辈呀对于这个行业

我也希望我是大哥大姐呀可以我没有那个资格呵呵[:(]

17楼: 大老远听到靓妹呼救,还以为能英雄救妹呢.
跑来一看,被一群狼围上了,顾命要紧,先彻啦!

Combox1.Items.LoadFormFile(nFileName);

18楼: 正感兴趣，收藏。

19楼: 一不小心误进狼窝!