您的位置:程序门 -> delphi -> windows sdk/api



帮忙把以下三句c语言转成delhpi 就送100分(简单呀)


[收藏此页] [打印本页]选择字色:背景色:字体:[][][]


帮忙把以下三句c语言转成delhpi 就送100分(简单呀)[已结贴,结贴人:smileff8]
发表于:2007-12-04 10:52:06 楼主
private   pisdk.ipisdk   pisdk=   new   pisdk.pisdkclass();
private   pisdk.server   _piserver;
private   pisdk.pipoint   _pipoint;
发表于:2007-12-04 11:50:571楼 得分:30
uses   pisdk;
....

var
    pisdk   ipisdk;
    server   _piserver;  
    pipoint   _pipoint;
begin
    pisdk   :=   pisdk.pisdkclass();

end;
发表于:2007-12-04 12:44:482楼 得分:0
这是c?
发表于:2007-12-04 12:47:323楼 得分:20
如果是
uses       pisdk;  
....  

var  
        pisdk       ipisdk;  
        server       _piserver;      
        pipoint       _pipoint;  
begin  
        pisdk       :=       pisdk.pisdkclass();  

end;
------------------------------------
這就沒問題了吧?
发表于:2007-12-04 13:16:594楼 得分:0
以上语言是c#,我现在想用delhpi尝试进行pisdk的应用,参考了(使用c#进行基于pi的开发(一)   ):http://www.cnblogs.com/laue/archive/2006/12/30/413409.html
可我是个c盲,没用过c语言,所以想请教一下
谢谢zhao_yong   ,你的方法语法检查没通过,pisdk:=pisdk.pisdkclass();       这一句就卡了
发表于:2007-12-04 13:30:125楼 得分:10
component-> import   activex   control
安装这个activex组件就可以了
发表于:2007-12-04 13:38:286楼 得分:0
ipisdk是一个类,我定义了一个
var
usrsdk:ipisdk
begin
usrsdk:=ipisdk.creat;  
程序报:object   or   class   type   required   如何处理?
发表于:2007-12-04 13:44:047楼 得分:0
我已经安装了   pisdk   ,已经import   type   library方法将pisdk,picommon   库引用,并生成pisdkcommon_tlb,pisdk_tlb两个pas文件
发表于:2007-12-04 13:44:348楼 得分:10
c#   ->   delphi
可能会困难写

delphi.net   就行,不过我不太研究delphi.net
发表于:2007-12-04 14:12:049楼 得分:30
uses       pisdk;  
....  

var  
        pisdk       pisdk;   //类名
        server       _piserver;      
        pipoint       _pipoint;  
begin  
        pisdk       :=       pisdk.pisdkclass();  

end;
发表于:2007-12-05 10:52:4410楼 得分:0
终于在   ,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   );


发表于:2007-12-05 10:54:1311楼 得分:0
谢谢楼上几位     结贴了  


快速检索

最新资讯
热门点击