Ò׽ؽØͼÈí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB

delphiµ÷ÓÃVCDLLÀàÇóÖú - VC/MFC / ½ø³Ì/Ïß³Ì/DLL

VCDLLÒѾ­´´½¨ºÃ¡£
ÎÒ½¨ÁËÒ»¸öÀà
´óÖ´úÂëÈçÏÂ

C/C++ code:

typedef class ZHallAPI
{

public:

virtual int GetVersion() = 0;

virtual int Prepare() = 0;

virtual int UnPrepare() = 0;

virtual int Connect(char* szIPAddr, unsigned short usIPPort) = 0;

virtual int DisConnect() = 0;

virtual int ClientLogin(const LPCLIENTLOGIN lpClientLogin, LPCLIENTLOGINRST lpClientLoginRst, char* szErrInfo) = 0;


} HALLAPI, *LPHALLAPI;

LPHALLAPI __stdcall GetHallApi();

LPHALLAPI __stdcall GetHallApi()
{
static ZClientInstance Instance;
return &Instance;
}
int ZClientInstance::MyPrepare()
{
int iRet(0);


if(this->bPrepared)
{

return T_OK;
}
this->lpClientAPI = GetClientAPI();
iRet = this->lpClientAPI->Prepare();
if(Z_OK != iRet)
{
return ERR_TP_CLIENT_ERROR;
}
this->bPrepared = true;
return T_OK;
}

int ZClientInstance::Prepare()
{

int iRet =this->MyPrepare();

if(T_OK != iRet)
{
this->UnPrepare();
}
return iRet;

}
int ZClientInstance::GetVersion()
{
//return this->API_VERSION;
return 123;
}
.......................


¸ÃdllÔÚvcϵ÷ÓòâÊÔͨ¹ý£¬ÔÚdelphiÖвâÊÔµ÷Ó㬻ᱨµØÖ·Òì³£


Ïà¹ØÎÊ´ð£º

delphiÔõô¿ØÖÆUSB - Delphi / VCL×é¼þ¿ª·¢¼°Ó¦ÓÃ

ÒÔÇ°ÖмäÕ¾ÊǵçÄÔͨ¹ý´®¿Ú¿ØÖƵģ¬ÏÖÔڸijÉÁËUSB½Ó¿Ú£¬ÇëÎÊÒªÔõô×ö°¡£¿Çó¸ßÊÖÖ¸µãÒ»ÏÂ
ÊÇusbת´®¿ÚÂð£¿ÄÇÓ¦¸Ã»¹ÊÇ¿ÉÒÔ°´´®¿Ú²Ù×÷µÄ£¬Ö»ÊÇËٶȲ»ÄÜÌ«¸ß

Èç¹û²»ÊÇusbת´®¿Ú£¬Çë²éÔÄusbÇý¶¯µÄsdk˵Ã÷¡£

Õâ¸öÊDz ......

delphi - Delphi / ÓïÑÔ»ù´¡/Ëã·¨/ϵͳÉè¼Æ

±¾È˽ñÄê17Ëê,·Ç³£Ï²»¶delphi,µ«ÓÉÓÚ»ù´¡ÓÐÏÞ,´ÓÍøÉÏÏÂÔØ×ÊÁÏѧϰ,¿´µÃÔÎËÀÁË,¶¼²»ÖªµÀÔÚ˵ʲô!ËùÒÔ½ñÌìÔÚ´Ë·¢Ìû,¹ãÑû¸÷λdelphi°®ºÃÕß°ïÖúÎÒ!Èç¹û±¾ÈËËûÈÕÓÐÐÒѧµÃdelphi±à³Ì,¶¨µ±°ÑÔ´´úÂë·¢²¼³öÀ´,ÔÚ´ËÒ»±í¸Ðл!Ï ......

delphi ûÓÐÖ´ÐнçÃæ²»ÏÔʾ - Delphi / ·Ç¼¼ÊõÇø

ÎÒÔÚÖ´ÐÐDelphi2010µÄʱºò£¬Ã»ÓгöÏÖÖ´ÐеĽçÃ棬Çó¸ßÊÖ°ï棬лл


End_rbody_65722921//-->
¸Ã»Ø¸´ÓÚ2010-05-26 08:24:26±»°æÖ÷ɾ³ý


¶ÔÎÒÓÐÓÃ[0]
¶ª¸ö°åש[0]
ÒýÓÃ
¾Ù±¨
¹ÜÀí
TO ......

delphi ÐÂÔösheetÎÊÌâ - Delphi / VCL×é¼þ¿ª·¢¼°Ó¦ÓÃ

ÈçºÎʹÐÂÔöµÄsheetÔÚÇ°Ò»¸ösheetºó£¬excelĬÈÏÓÐ3¸ösheet,ÈçÎÒÐÂÔöÒ»¸ösheet4,ÔõÑùʹËüÊDzåÔÚsheet3ºóÄØ£¬¶ø²»ÊDzåÔÚsheet1Ç°£¿
ÓÒ¼ü²»ÐÐÂð£¿

Worksheets.Add ·½·¨ 
¸Ã·½·¨ÓÃÓÚн¨¹¤×÷±í¡£
Function Ad ......

delphi ÐÄÌø°ü - Delphi / VCL×é¼þ¿ª·¢¼°Ó¦ÓÃ

ÎÒÔÚÏîÄ¿ÀïÊÇÔÚÕÒ²»µ½ÐÄÌø°üдʲôµØ·½ÁËÄÇλ´ó¸çÄÜ°ïÎÒÔ¶³ÌЭÖúÕÒһϰ¡Ð»Ð»°¡
ÎÒqq398222333

ÀÏ°å²»ÈÃ


ËÑË÷Ò»ÏÂɶ
Õâ¸öÏîÄ¿µÄ´úÂë²»ÊÇÄãдµÄ£¿

ËÑË÷²»µ½Âð

¾ÍÊÇд¹ýÁË£¬²»ÖªµÀ¶ªÔÚÄÄÁË£¬Â¥Ö÷´úÂëÐ ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØͼ | ¸ÓICP±¸09004571ºÅ