我的一个程序要反复调用一个过程,我把他写入了dll(第一次用,不太会),作用是这个过程从mainini.ini读取信息到music.text和skin.text,举个例子吧:
过程:
procedure read_write(var music,skin:string;var Ismusic,Isskin:boolean);
mainini:tinifile;
begin
maini:=tinifile.create('\.mainini.ini');
music:=maini.readstring('music','musicway','');
skin:=maini.readstring('skin','skinway','');
ismusic:=readbool('music','Ismusic',true);
isskin:=readbool('skin','Isskin',true);
end;
调用:
read_write(edit_music,edit_skin,musicplay,skindata.active);
程序老出错,说什么edit_music,edit_skin,musicplay,skindata.active类型不符合,还有什么常量不能改变,全是英文,我翻译过来的,不能生长exe。引用dll估计没问题,那应该怎么改才可以,谢谢!(注:上面的程序中,edit_music,edit_skin是edit空间,musicplay是boolean类型,skindata.active是我安装的VclSkin控件。
过程:
procedure read_write(var music,skin:string;var Ismusic,Isskin:boolean);
mainini:tinifile;
begin
maini:=tinifile.create('\.mainini.ini');
music:=maini.readstring('music','musicway','');
skin:=maini.readstring('skin','skinway','');
ismusic:=readbool('music','Ismusic',true);
isskin:=readbool('skin','Isskin',true);
end;
调用:
read_write(edit_music,edit_skin,musicplay,skindata.active);
程序老出错,说什么edit_music,edit_skin,musicplay,skindata.active类型不符合,还有什么常量不能改变,全是英文,我翻译过来的,不能生长exe。引用dll估计没问题,那应该怎么改才可以,谢谢!(注:上面的程序中,edit_music,edit_skin是edit空间,musicplay是boolean类型,skindata.active是我安装的VclSkin控件。
解决方案 »
- 千年一遇日环食,发帖纪念
- 超级简单的问题。ShellTreeView怎么让它的ReadOnly为True。现在我发现它没有这个属性。顶者有分!
- ADO设置了批更新后,回滚不了
- 求教,关于读写文件的问题
- 关于Delphi程序员前途的问题
- 关于数据表追加到自身的问题
- 救命呀!怎么样将SQL数据库导出到ACCESS中,用SQL的存储过程也可以,我的时间不多了!
- 如何使dxbaredit得到焦点
- 简单的update 语句,总是提示说语法错误,高手指点之,多谢
- RzPageControl停靠窗口时出错Error saving device context
- 看看我哪里错了啊,谢谢!
- 请教查询时间的sql语句!
read_write(edit_music.text,edit_skin.text,musicplay,skindata.active);