Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö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×öSOHUµÄ - Delphi / ·Ç¼¼ÊõÇø

Ò»°ã¶¼ÊÇÔõô½Ó»îµÄ£¿
ÊÕÈëÔõôÑù
sohu£¿soho£¿

sohu ¿ÉÄÜÊÇsmall office house unit
С°ì¹«ÊÒ£¬°Ñ¼Ò±ä³Éµ¥Î»¡£

È¥Íþ¿ÍÍø°¡,ºÜ¶à¸öÄØ,»¹ÓÐÍâ°üµÄÍøÕ¾

ѧϰѧϰ¡£

ÏÖÔÚDelphi×ö¶«Î÷²»ÐÐÁË,´¦ÓÚÌÔÌ­×´ ......

¸¶·ÑÇódelphiÆ´Òô±à³Ì - Delphi / ·Ç¼¼ÊõÇø

¾ßÌåÒªÇóÓ뱨³êQQ729851670
771234717

¡°Æ´Òô±à³Ì¡±ÊÇʲôÒâ˼

ÒýÓÃ
¡°Æ´Òô±à³Ì¡±ÊÇʲôÒâ˼
1.¸øÒ»¸ö×Ö¿ÉÒÔÏÔʾƴÒô£¬¶àÒô×ֵϰÄÜÏÔʾ¶ÔÓ¦µÄ¶à¸öÆ´Òô
2.¶Ô°üº¬¶àÒô×ֵĴÊÓïÖÇÄÜʶ±ð¸ø³öÆ´Òô¡£
3.¶ÔÒ»¶Î ......

³õѧÕßÈçºÎѧϰdelphi? - Delphi / ·Ç¼¼ÊõÇø

1.ÎÒ²»»áÓ¢Óï,ÏÂÔØÁ˸ödelphi2010,´ò¿ªÒÔºóÀïÃæÈ«²¿ÊÇÓ¢Óï,Á¬°ïÖúÎļþÒ²ÊÇÓ¢Óï,ÓÐûÓкº»¯°æµÄ?
2.ÏÂÃæÊÇ×°delphi2010µÄʱºò×°½øÀ´µÄ,Âé·³½âÊÍÕâЩÊÂʲô
Embarcadero Delphi and C++ Builder 2010 Database Pack ......

delphi IDEµÄÎÊÌâ - Delphi / VCL×é¼þ¿ª·¢¼°Ó¦ÓÃ

ÎÒÊÇÐÂÊÖÏ£Íû´ó¼ÒôÅç¡£¡£
¾ÍÊÇÏëÎÊһϠ¹ØÓÚIDEµÄÎÊÌâ··
ÕÒÁ˺þ㬾ÍÊÇûÕÒÈ«¡£
Ï£Íû´ó¸çÃÇÌṩһϹþ¡£¡£¡£¡£
лл··
ÄãÏëÎÊIDEµÄʲôÎÊÌâ

¿ÉÒÔ¾ßÌ嵽ʲôÎÊÌâÂï


ÏÖÔÚµÄͬѧÌáÎ ......

ÇóÖúXMLÎļþ±£´æÎÊÌâ - Delphi / VCL×é¼þ¿ª·¢¼°Ó¦ÓÃ

RXmlDoc := System.xml.XmlDocument.Create;
  sxml := copy(sRsult, ir + 8, length(sRsult));
  sxml := System.Text.Encoding.GetEncoding('gb2312').GetString(Convert.fromB ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ