一个简单的资源问题 ( 积分: 50 )

S

sunjialong

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-07-15

• #1

如何把一个文本文件作为资源包含在一个程序中
并在程序中调用它的内容（如：把它的内容显示在Memo中）
我对这方面一窍不通，大家最好写个示例
感谢！

 

S

sunjialong

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-07-15

• #2

如何把一个文本文件作为资源包含在一个程序中
并在程序中调用它的内容（如：把它的内容显示在Memo中）
我对这方面一窍不通，大家最好写个示例
感谢！

 

F

FlashDance

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-07-15

• #3

一、使用SesourceString定义字符串
二、例：
新建文本文件，输入：
stringtable
begin
1,"book"
2,"apple"
3,"desk"
4,"pen"
5,"computer"
end
另存为S.rc
编译S.rc如：D:/Program Files/Borland/Delphi7/Bin/brcc32.exe
Dos下brcc32 S.rc
程序中：
implementation
{$R *.DFM}
{$R S.res}
procedure TForm1.FormCreate(Sender: TObject);
begin
Caption := LoadStr(1);
end;

 

F

FlashDance

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-07-15

• #4

一、中写错了，是用ResourceString来定义字符串常量

 

S

sunjialong

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-07-15

• #5

我不想要stringtable
我的文本文件是多行的，我想把它整个载入

 

F

FlashDance

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-07-15

• #6

stringtable是关键字，意思是下面将定义一个字符串资源文件！

 

S

sunjialong

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-07-15

• #7

我的文本文件是多行的
1,"book"
每次不是只能输入一行吗？

 

F

FlashDance

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-07-15

• #8

你可以写：
stringtable
begin
"中华人民共和国中华人民共和国中华人民共和国中华人民共和国"
end
中间不加换行符，就是一行

 

S

sunjialong

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-07-15

• #9

我想要一次输入多行
"中华人民共和(这里是换行符,下同)
国中华人民共
和国中华人民共
和国中华人民共
和国"
行吗？

 

S

sunjialong

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-07-15

• #10

我想要一次载入
而不是一行一行的！

 

F

FlashDance

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-07-15

• #11

不是说不要用换行符吗，不要用#13#10来换行
stringtable
begin
1,"中华人民共和国中华人民共和国中华人民共和国中华人民共和国"
end

 

S

sunjialong

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-07-15

• #12

我有一个几百行的文件，我想一次载入
而不是把它处理成
1,"book"
2,"apple"
3,"desk"
4,"pen"
5,"computer"
的格式，一行一行的加入
我不想累死
难道Delphi如此差劲只能这么办？

 

S

sunjialong

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-07-15

• #13

我要把它的整个内容（几百行），一次加入到 Memo中，而不是只加入一行

 

F

FlashDance

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-07-15

• #14

res是通用格式，在C中你也得这么做
你可以这么写：
stringtable
begin
1,"中国"
"英国"
"韩国"
2,"美国"
end
说Delphi差，你别用了

 

S

sunjialong

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-07-15

• #15

真没别的办法了？

 

S

sunjialong

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-07-15

• #16

我那个文件经常修改
完了
我快疯了

 

F

FlashDance

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-07-15

• #17

上面不是告诉你了吗？
在你的文本文件前面加上
stringtable
begin
1,"

在最后面加上

end

中间的部分就是字符串资源了，用LoadStr(1);读取

 

S

sunjialong

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-07-15

• #18

还是不行
给出文件一部分：
------------开始----------
* 改正了 已知两直线求焦点函数 中 判断是否能做出方程条件 中的错误。
* 统一了程序中的无理数输入输出框，并在其上增加了右键快捷菜单，提供了一些常用功能。更主要的是它们能够识别带括号的四则运算表达式。
* 统一了程序中的综合输入输出框，并改变了样式。
* 修正了 方程输出模块 可能崩溃的问题。
* 增加了 帮助 部分。
--------结束---------------

 

S

sunjialong

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-07-15

• #19

每次只能一行，我想把他们全部 一次（！！！）载入

 

F

FlashDance

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-07-15

• #20

是一次十载入的，照下面的例子做：
S.rc内容：
StringTable
begin
1,"中国"
"英国"
"日本"
2,"美国"
end
程序中：
implementation
{$R *.dfm}
{$R S.res}
procedure TForm1.Button1Click(Sender: TObject);
begin
Memo1.Lines.Text:=LoadStr(1);
end;
看一下吧：
Memo1中的内容是：
中国英国日本