把一句VB的声明转成Delphi

aton 2004-01-07 04:02:32
在VB里有一句
Private Declare Function SendDP Lib "demo.dll" (ByVal hDC As Long, _
ByVal CommPort As String, ByVal ShowMode As Long, ByVal PageNo As Long, _
ByVal StopTime As Long, ByVal PageNum As Long) As Long
转成Delphi应该怎么写?
...全文
101 5 打赏 收藏 转发到动态 举报
写回复
用AI写文章
5 条回复
切换为时间正序
请发表友善的回复…
发表回复
coolzlay 2004-01-07
  • 打赏
  • 举报
回复
还要把它靠的系统的SYSYTEM目录下才可以
hthunter 2004-01-07
  • 打赏
  • 举报
回复
to xiaoxiaobai(小白.net):我忘了写返回值了,呵呵
xiaoxiaobai 2004-01-07
  • 打赏
  • 举报
回复
function SendDP(
const hDC: Integer;
const CommPort: String;
....
....
):Integer; external 'demo.dll';
steventone 2004-01-07
  • 打赏
  • 举报
回复
up

var
function CarObj:TCar ;external 'DemoSvr.dll';
function BicycleObj:TBicycle ;external 'DemoSvr.dll';
hthunter 2004-01-07
  • 打赏
  • 举报
回复
是不是要引用demo.dll的SendDP函数?
function SendDP(
const hDC: Integer;
const CommPort: String;
....
....
); external 'demo.dll';

1,183

社区成员

发帖
与我相关
我的任务
社区描述
Delphi Windows SDK/API
社区管理员
  • Windows SDK/API社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧