Çë´ó¼Ò°ïæѡÁ½±¾delphiÈëÃÅÊé
¿ªÊ¼Ñ§delphiÁË£¬µ«ÊÇÂòÁ˱¾delphi³ÌÐòÉè¼ÆµÚ¶þ°æ£¬·¢ÏÖ¸Õ¿ªÊ¼£¬Á¬µãÓï·¨¶¼Ã»½Ì£¬¾ÍÈÃËãÌ⣬¸Ð¾õÓеãÄÑÈëÃÅ£¬Ñ°Ë¼»»±¾ÊµÌåÊéÀ´¿´,delphi5¿ª·¢ÈËÔ±Ö¸ÄϺÍdelphi7´ÓÈëÃŵ½¾«Í¨ ÕâÁ½±¾Äı¾ÊʺÏÎÞdelphi»ù´¡µÄÈËÀ´Ñ§£¬ ÕâÁ½±¾ÊµÌåÊ飬¶¼ÊǸ´Ó¡°æ£¬ÎÒÓеç×ÓÊ飬¸Ð¾õ×ܲ»ÊǺܷ½±ã
ÏÂÔØdelphi7ÊÓƵ½Ì²Ä
ÂòD7ÄDZ¾°É,ÂýÂýÀ´,ÏÈÊìϤÓï·¨ºÍ¿Ø¼þ
¶¼É¶Ê±ºòÁË£¬»¹Ñ§Ï°DELPHI£¿£¿£¿
Ïà¹ØÎÊ´ð£º
Çë½Ì¸÷·¸ßÊÖ¡£ÎäÁÖÇ°±²¡£ÎÒ½«B.EXE×ö³É×ÊÔ´Îļþ£¬È»ºó¼Óµ½123.dllÖС£ÓÃA.EXEÀ´µ÷ÓÃ123.dllÖеÄB.EXE
Çë¸÷λǰ±²°ïæָ½ÌÏ¡£A.exeÈçºÎÀ´µ÷ÓÃdllÖеÄexe£¿´úÂëÓÖ¸ÃÈçºÎд£¿
ÎÞÈ˻شð£¿
×ö³É×ÊÔ´Î ......
VC ¿ØÖÆ̨³ÌÐò:
#include <iostream>
using namespace std;
int main()
{
const int def_buffer = 1024 * 4;
DWORD t;
BYTE b[def_buffer];
memset(b, 0, sizeof(b));
PBYTE p;
t = GetTickC ......
¸÷λºÃ£¡£¡
¼ÙÉèÎÒÓÐÁ½¸ötextÎļþ
Ò»¸öÃû½Ð 1.text
ÄÚÈÝ£º
I like PC....
ÁíÍâÒ»ÊÇ2.text
ÄÚÈÝ:
function yk as string
endfunction
globals
endglobals
***********************·Ö½çÏß********** ......
ËÄܸøÎÒ¸ö¼òµ¥µÄÀý×Ó
delphi½ÓÊÜUDPÊý¾Ý°üµÄ Òª½ÓÊÕÊý×éµÄ
×îºÃÊÇÓà IdTCPserver1µÄ
×îºÃ»¹Óз¢Ë͵IJ¿·Ö
±¾È˲ËÄñ£¬Ð»Ð»¸÷λÁË£¡£¡
Â¥ÉϸøµÄÊÇTCPµÄ°É ÎÒÒªUDPµÄ
лл£¡£¡
ÒýÓÃ
×îº ......
Delphi(Pascal) code:
library Smart;
uses
SysUtils,
Classes,
Forms,
Dialogs,
Windows,
SmartWord in 'SmartWord.pas' {frmSmartWord},
pub in 'pub.pas';
{$R *.res}
var
AppDLL:T ......