简单问题,请教 网上下载的代码,引用的别的单元,比如,引用了 unit about,那怎么才能打开unit about的界面,对这个界面进行修改呢?等下还有个小问题求教。 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 按住ctrl,鼠标左键点击unit about的about,这样就可以进入about单元,按F11或F12呼唤窗体。 about 单元你也一并下载了下来 ------另外个问题是,这个工程生成了一个exe,一运行,就生成了几个配置文件,这几个配置文件里面的内容我在哪里修改? (1)如果是要对设定进行修改,直接打开ini,进行赋值 (2)如果是要修改代码生成ini文件的过程,那么找到代码中有inifile类似的东东,里面是它如何生成ini的,其他类型配置文件也是一样的。 那个login是高手,总给别人代码,一会就写出来了,牛逼 我发现,这个程序运行的时候,是用这个函数ExportResourceDataToFile('INI0001', ConfigFileName);procedure ExportResourceDataToFile(const ResName, FileName: string);var Bytes: TBytes;begin GetResourceData(ResName, Bytes); SaveToFile(FileName, Bytes);end;procedure GetResourceData(const Name: string; var Bytes: TBytes);var Stream: TResourceStream;begin Stream := TResourceStream.Create(HInstance, Name, RT_RCDATA); try SetLength(Bytes, Stream.Size); Stream.ReadBuffer(Bytes[0], Stream.Size); finally Stream.Free; end;end;procedure SaveToFile(const FileName: string; const Data: TBytes);var Stream: TFileStream;begin Stream := TFileStream.Create(FileName, fmCreate); try Stream.Size := 0; Stream.WriteBuffer(Data[0], Length(Data)); finally Stream.Free; end;end; ExportResourceDataToFile('INI0001', ConfigFileName);中的'INI0001'为源头。procedure ExportResourceDataToFile(const ResName, FileName: string);名字取得很好ResName,就是它 我请教一下:ExportResourceDataToFile('INI0001', ConfigFileName)这个函数是将资源ini0001中的内容导入到configfilename中去我的意思是,ini0001的内容在哪里能找到呢?我想修改一下ini0001中的内容. 开始->搜索->所有文件和文件夹->全部或部分文件名->ini0001搜索到了之后打开进行查看 MessageBox问题 delphi 2006 安装失败。 如何合并两个Activex library项目? delphi窗体之间怎样传递值? 怎样得到天数? COM+安装 請教一個Borland Database Desktop的問題。。。 在线等待---如何知道一个文件是我修改过的 让我么来谈谈今年的就业形式吧! 哪里有Installshield的中文包下载? Unknown database Alias:passname为题?? 请问怎样得到ADOQuery批量更新的记录
(2)如果是要修改代码生成ini文件的过程,那么找到代码中有inifile类似的东东,里面是它如何生成ini的,其他类型配置文件也是一样的。
procedure ExportResourceDataToFile(const ResName, FileName: string);
var
Bytes: TBytes;
begin
GetResourceData(ResName, Bytes);
SaveToFile(FileName, Bytes);
end;
procedure GetResourceData(const Name: string; var Bytes: TBytes);
var
Stream: TResourceStream;
begin
Stream := TResourceStream.Create(HInstance, Name, RT_RCDATA);
try
SetLength(Bytes, Stream.Size);
Stream.ReadBuffer(Bytes[0], Stream.Size);
finally
Stream.Free;
end;
end;
procedure SaveToFile(const FileName: string; const Data: TBytes);
var
Stream: TFileStream;
begin
Stream := TFileStream.Create(FileName, fmCreate);
try
Stream.Size := 0;
Stream.WriteBuffer(Data[0], Length(Data));
finally
Stream.Free;
end;
end;
中的'INI0001'为源头。
procedure ExportResourceDataToFile(const ResName, FileName: string);
名字取得很好ResName,就是它
ExportResourceDataToFile('INI0001', ConfigFileName)
这个函数是将资源ini0001中的内容导入到configfilename中去
我的意思是,ini0001的内容在哪里能找到呢?我想修改一下ini0001中的内容.
搜索到了之后打开进行查看