library firdll;uses
SysUtils,
Classes,
Un in 'Un.pas';{$R *.res}begin
end.
unit Un;interfaceuses Windows, Messages, Dialogs, SysUtils;var
function fu:bool;stdcall; //identifier expected but 'function' found;implementation //type expected but 'implemention' found function fu:integer;begin
result:=0;
end;end.
多谢
SysUtils,
Classes,
Un in 'Un.pas';{$R *.res}begin
end.
unit Un;interfaceuses Windows, Messages, Dialogs, SysUtils;var
function fu:bool;stdcall; //identifier expected but 'function' found;implementation //type expected but 'implemention' found function fu:integer;begin
result:=0;
end;end.
多谢
解决方案 »
- OLE访问Excel求列的平均值??求教
- 傻问:exe文件可以存到数据库吗?blob型字段是不是可以存任何类型数据?非常感激.........
- 請大家幫一下忙
- 关于应用层与业务层的问题?
- #####紧急问题请问各位高手哪里有下载APRO传真控件谢谢了#######
- 分好多,放
- 能否实现这样的功能:在edit中输入数字后,按回车后就能showmessage
- 不想用现成的 IS Express Delphi 4.0 Beta,想自己写一个个性化的安装程序,怎样搞?
- 关于dblookupcombobox?
- 找寻skimwater(掠水惊鸿),关于QRDBText,QRMemo (续)60分
- 请教-----------------无限进制转换函数的BUG?
- 求普及型DELPHI教程!
函数返回值不相同 ,
1:
var
function fu:bool;stdcall; //identifier expected but 'function' found; var 是用来定义变量的,你没有定义变量这个var就不需要了2:
function fu:integer;
begin
result:=0;
end; 函数声明不一致,改成
function fu:bool;stdcall;
begin
result:=false;
end;