Readcard (long port, string sysid, ref string rfromid, ref string userid, ref long cardtype, ref long cardflag, ref real price [], ref long stepp [], ref long warn, ref long overdraft, ref long limit, ref real salemoney, ref long buycount, ref real totalusage, ref real leftmoney, ref long reed, ref long valve, ref long flash, ref long ', ref string meterdate) returns long
-- -- -- -- -- -- -- -- -- -- process -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- --
Long tt
String sysid rfromid, userid, meterdate
Long cardtype cardflag, buycount, reed, valve, flash, 'and warn, overdraft limit,
Real salemoney totalusage, leftmoney
Sysid="ABCD0102"
Rfromid=space (17)
Meterdate=space (17)
Int I
Real price []
Long stepp []
For I=1 to 2
Stepp [I]=0
Next
For I=1 to 3
Price [I]=0.00
Next
Tt=ReadCard (port1, sysid rfromid, userid, cardtype, cardflag, price, stepp, warn, overdraft, limit, salemoney, buycount, totalusage, leftmoney, reed, valve, flash, ', meterdate)
One of the return price, stepp part how to write?
CodePudding user response:
Stepp price [], [] pointer in BCB do?CodePudding user response:
This can know both PB and understand BCB, can help the top,