帮忙把以下三句C语言转成DELHPI 就送100分(简单呀) private PISDK.IPISDK piSDK= new PISDK.PISDKClass();private PISDK.Server _piServer;private PISDK.PIPoint _piPoint; 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 uses PISDK;....var piSDK IPISDK; Server _piServer; PIPoint _piPoint;begin piSDK := PISDK.PISDKClass();end; 如果是uses PISDK; .... var piSDK IPISDK; Server _piServer; PIPoint _piPoint; begin piSDK := PISDK.PISDKClass(); end;------------------------------------這就沒問題了吧? 以上语言是C#,我现在想用delhpi尝试进行pisdk的应用,参考了(使用C#进行基于PI的开发(一) ):http://www.cnblogs.com/laue/archive/2006/12/30/413409.html可我是个C盲,没用过C语言,所以想请教一下谢谢zhao_yong ,你的方法语法检查没通过,PISDK:=PISDK.PISDKClass(); 这一句就卡了 component->import activex control安装这个activex组件就可以了 IPISDK是一个类,我定义了一个varusrsdk:ipisdkbeginusrsdk:=ipisdk.creat; 程序报:Object or class type required 如何处理? 我已经安装了 PISDK ,已经import type library方法将PISDK,PICOMMON 库引用,并生成PISDKCommon_TLB,PISDK_TLB两个PAS文件 C# -> Delphi可能会困难写Delphi.net 就行,不过我不太研究Delphi.net uses PISDK; .... var piSDK PISDK; //类名 Server _piServer; PIPoint _piPoint; begin piSDK := PISDK.PISDKClass(); end; 终于在 ,PISDK_TLB.PAS 文件找到了建立类方法了class function CoPISDK_.Create: IPISDK;正确的程序应该如下:var usrpiSDK : IPISDK; usrservers: Servers; usrServer : Server; usrPIPoint : piPoint; cur , dflt , temp : Integer ; usrpt,usrvalue,temps:widestring;begin usrpisdk:=CoPISDK_.Create; // usrservers:=usrpisdk.Servers ; usrserver:=usrpisdk.Servers.DefaultServer ;// showmessage(usrserver.Name ); 求U.are.U指纹仪开发包或帮助文档 怎样在DbGrid的左边,实现像EXCEL那样的自动编号? ListView1有没有一个筛选的功能。如只显示ListView1.columns[1]中内容为AAA的行 查询某个时间段内记录的问题,急啊,有劳各位了! Delphi中用ADO进行数据库连接问题 关于存储过程OUT参数的问题 如何实现Delphi与C++混合编程? 简单的问题,关于数据库基础???????????? 爽!今天买了一个可无线上网的手提,散分! ???????为什么ActiveForm的Destroy事件不起作用? 错误运行? DELPHI如何应用PISDK开发
....var
piSDK IPISDK;
Server _piServer;
PIPoint _piPoint;
begin
piSDK := PISDK.PISDKClass();end;
uses PISDK;
.... var
piSDK IPISDK;
Server _piServer;
PIPoint _piPoint;
begin
piSDK := PISDK.PISDKClass(); end;
------------------------------------
這就沒問題了吧?
可我是个C盲,没用过C语言,所以想请教一下
谢谢zhao_yong ,你的方法语法检查没通过,PISDK:=PISDK.PISDKClass(); 这一句就卡了
安装这个activex组件就可以了
var
usrsdk:ipisdk
begin
usrsdk:=ipisdk.creat;
程序报:Object or class type required 如何处理?
可能会困难写Delphi.net 就行,不过我不太研究Delphi.net
.... var
piSDK PISDK; //类名
Server _piServer;
PIPoint _piPoint;
begin
piSDK := PISDK.PISDKClass(); end;
class function CoPISDK_.Create: IPISDK;正确的程序应该如下:var
usrpiSDK : IPISDK;
usrservers: Servers;
usrServer : Server;
usrPIPoint : piPoint;
cur , dflt , temp : Integer ;
usrpt,usrvalue,temps:widestring;begin
usrpisdk:=CoPISDK_.Create;
// usrservers:=usrpisdk.Servers ;
usrserver:=usrpisdk.Servers.DefaultServer ;
// showmessage(usrserver.Name );