把一句VB的声明转成Delphi

Question

在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应该怎么写？

Answer 1

是不是要引用demo.dll的SendDP函数？
function SendDP(
  const hDC: Integer;
  const CommPort: String;
  ....
  ....
  ); external 'demo.dll';

Answer 2

upvar
  function CarObj:TCar ;external 'DemoSvr.dll';
  function BicycleObj:TBicycle ;external 'DemoSvr.dll';

Answer 3

function SendDP(
  const hDC: Integer;
  const CommPort: String;
  ....
  ....
  ):Integer; external 'demo.dll';

Answer 4

to xiaoxiaobai(小白.net)：我忘了写返回值了，呵呵

Answer 5

还要把它靠的系统的SYSYTEM目录下才可以