导航:
论坛 -> DELPHI技术
斑竹:liumazi,sephil
作者:
2004/3/3 15:20:57
标题:
[求救]如何将*.TXT文本文件导入到DELPHI中来!
浏览:1547
加入我的收藏
楼主:
例如:文本文件ORDER.TXT中有2条命令: 1号.DFJSAHFJKSDAHFJKSA 2号.SDFDSHUIHISHCJKDSHAC 我要将文件中内容通过下拉菜单命令选择导入到Memo控件!谢谢
----------------------------------------------
喜欢淡淡的蓝色,轻轻的感动...
作者:
2004/3/3 15:22:51
1楼:
想要代码?
----------------------------------------------
男儿贵展平生志,为国输忠合天地。甲穿虽则失黄金,剑缺犹能生紫气。塞草萋萋兵士苦,胡虏如今勿胡虏。封侯十万始无心,玉关生入君看取。 敬请光临 学海Delphi站 http://delphi.studysea.net 学海无涯,让我们共同成长!
作者:
2004/3/3 15:30:44
2楼:
在下拉菜单的菜单项中加入如下指令: if loaddialog1.execute then memo.loadfromfile(loaddialog1.filename); 即可将文本文件中的内容装入memo控件中
----------------------------------------------
-
作者:
2004/3/3 15:31:41
3楼:
同意楼上。
----------------------------------------------
-
作者:
2004/3/3 15:49:11
4楼:
我的下拉菜单中如果选择1号命令就只导入文件中的第一行的1号命令内容,如果选择2号就导入第2行中2号命令内容,不能将文件内容全部导入,谢谢!
----------------------------------------------
喜欢淡淡的蓝色,轻轻的感动...
作者:
2004/3/3 16:06:38
5楼:
2 楼的代码再增加下边两句: { Memo.Lines.LoadFromFile() } ss:=Memo1.lines[your_Choice]; // var ss:string; Memo1.Text:=ss;
----------------------------------------------
-
作者:
2004/3/3 17:05:46
6楼:
还一个问题 我做一个类: OrderStrings: TStrings; 为什么不能加载:OrderStrings.LoadFromFile('order.txt'); 是不是类声明错了?
----------------------------------------------
喜欢淡淡的蓝色,轻轻的感动...
作者:
2004/3/3 18:49:25
7楼:
TStrings是个虚拟类,不能直接用; 你可用TStringList.
----------------------------------------------
-广袤璀璨的银河,永无止境的梦想(梦无止境游银河) 博客挂了……
作者:
2004/3/3 19:08:23
8楼:
TStringList. 是不是要引用调用哪个函数? [Error] Frm_Client.pas(74): Undeclared identifier: 'TStringslist'
----------------------------------------------
喜欢淡淡的蓝色,轻轻的感动...
作者:
bios (阿贡)
★☆☆☆☆
-
盒子中级会员
2004/3/3 19:25:36
9楼:
TStringslist //中间多一个S 去掉他 TStringlist 正确!
----------------------------------------------
作者:
2004/3/3 20:38:20
10楼:
OrderStrings: TStringlist ; OrderStrings.LoadFromFile('order.txt'); 还是无法实现!求高手帮忙!
----------------------------------------------
喜欢淡淡的蓝色,轻轻的感动...
作者:
2004/3/4 8:23:16
11楼:
5楼的方法可以实现! 如果你用TStringList,实现原理与5楼的Memo1.Lines[]是一样的(因为它也是从TStrings继承过来的); 当然,首先你得用OrderStrings:=TStringList.Create;创建,然后你就可以按行读写了!
----------------------------------------------
-广袤璀璨的银河,永无止境的梦想(梦无止境游银河) 博客挂了……
作者:
bios (阿贡)
★☆☆☆☆
-
盒子中级会员
2004/3/4 13:45:07
12楼:
小明儿 建议你先学习《面向对象》不然你功底真的不行!
----------------------------------------------
作者:
2004/3/5 8:44:29
13楼:
TO bios (阿贡) 谢谢阿贡的建议!
----------------------------------------------
喜欢淡淡的蓝色,轻轻的感动...