出错信息Resource not found mytxt117
rc中是这样定义的“mytxt1 txt 1.abc”
代码如下(在代码中我加入了{$R a.res}):
procedure TForm1.Button1Click(sender :tobject);
begin
Randomize();
key:=Random(299)+1;
with TResourceStream.Create(HInstance, 'mytxt'+inttostr(key), RT_RCDATA) do
begin
SaveToFile('c:\temp.txt');
Free;
end;
Form1.M1.Lines.LoadFromFile('c:\temp.txt');
Form1.Edit1.Text:=inttostr(key);
rc中是这样定义的“mytxt1 txt 1.abc”
代码如下(在代码中我加入了{$R a.res}):
procedure TForm1.Button1Click(sender :tobject);
begin
Randomize();
key:=Random(299)+1;
with TResourceStream.Create(HInstance, 'mytxt'+inttostr(key), RT_RCDATA) do
begin
SaveToFile('c:\temp.txt');
Free;
end;
Form1.M1.Lines.LoadFromFile('c:\temp.txt');
Form1.Edit1.Text:=inttostr(key);
解决方案 »
- 对于用AdoConnection控件连接数据库的程序如何部署到其他电脑上的问题
- 我在用TCP做一个类似于QQ的东东,请问如何从数据库读取好友分组和好友数据显示出来,这种树状结构最好用什么来处理,因为我还要添加删除分组等,组还要显示好友!
- 基础问题????
- 顶级域名和动态ip如何联系。
- 看看关于窗体的问题!
- 请高手指点BDE打包安装
- help me translate the function"varArrayHighBound"
- 请教,急!
- 如何生成Officexp效果的菜单
- 如何获得硬盘或者主版的序列号(API高手请进)
- 在程序启动时,自动创建窗体和手动创建窗体有什么不同
- 应该挺简单的, 就是CopyFile的问题
----------
楼主
这个东西是哪里来的?
你在哪里引用了呢?