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

ÕâÑùµÄvcµÄ½á¹¹Ì嶨Ò壬ÔõôÔÚdelphiÖж¨Òå

typedef struct
{
char  name[20];   
char  sex;
unsigned int age;           
}struct1

ÄǸöÊÇvcÖе͍Ò壬ÓÉÓÚÔÚdelphiÖÐÒ²´«ÕâÑùµÄ½á¹¹ÌåÊý¾Ý¸øvcдµÄdll,ÄǸö½á¹¹Ì壬ÔÚdelphiÖÐÔõô¶¨ÒåÄØ£¿



Delphi(Pascal) code:

struct1 = record
name : array [0..19] of Char;
sex : Char;
age : Word;
end;



  struct1 = record
    name : array [0..19] of Char;
    sex : Char;
    age : LongWord;
  end;


ageÄǸöÔÚdelphiÖе½µ×ÓÃʲôÀàÐÍѽ£¿

vcÌṩµÄdllº¯Êý£¬ÎÒÔÚdelphiÖÐÔõô¶¨ÒåÄØ£¿
int sendstruct1(char *ip,struct1 *mnu)

ÁíÍ⣬vc¶¨ÒåµÄ½á¹¹Ì壬ת³ÉdelphiµÄ½á¹¹Ì壬ԭÔòÊÇʲô£¿
×ñÑ­ ÔÚvcºÍdelphiÿ¸ö¶¨ÒåµÄ³ÉÔ±ËùÕ¼µÄ×Ö½ÚÊý±ØÐëÏàµÈô£¿ÊÇ×ñÑ­Õâ¸öÔ­Ôòô£¿£¿£¿

°´2Â¥µÄ£¬ÓÃLongWord
Longword 0..4294967295 unsigned 32-bit


Ïà¹ØÎÊ´ð£º

delphi Ctrl+×ó¼ü ÎÞ·¨²é¿´ windows.pas Ôõô°ì

ÎÒ°²×°µÄÊÇÆóÒµ°æ¡£¡£¡£ 
ÎÒÎÊÏ£¬ CTRL+×ó¼ü Äܲ鿴 windows.pas Âð£¿
¾ÍÊÇ ½Ó¿ÚÀïµÄwindows¡£

µ±È»¿ÉÒÔ,CTRL+×ó¼üµã»÷Interface²¿·ÖµÄWindows¾Í¿ÉÒÔÁË

ɶɶÆóÒµ°æ£¿È¥°²×°Ä¿Â¼¿´¿´libÎļþ¼ÐÏÂÓÐÃ»Ó ......

delphi Êý×é¸úfor

ÈçºÎÓÃÊý×é¸úfor´òÓ¡³öÏÂÃæµÄͼÐÎ
*
**
***
****

Èç¹ûÓиüºÃµÄ·½·¨×îºÃҲдÉÏ XX
procedure TForm1.Button2Click(Sender: TObject);
var
  arr: array of Integer;
  i,j: I ......

delphiÈçºÎµ÷ÓÃdllÎļþÖеÄexe£¿£¿

Çë½Ì¸÷·¸ßÊÖ¡£ÎäÁÖǰ±²¡£ÎÒ½«B.EXE×ö³É×ÊÔ´Îļþ£¬È»ºó¼Óµ½123.dllÖС£ÓÃA.EXEÀ´µ÷ÓÃ123.dllÖеÄB.EXE
Çë¸÷λǰ±²°ïæָ½ÌÏ¡£A.exeÈçºÎÀ´µ÷ÓÃdllÖеÄexe£¿´úÂëÓÖ¸ÃÈçºÎд£¿

ÏȰÑb.exe»¹Ô­³öÀ´ÔÚµ÷Óã¬Ó¦¸ÃÊÇ× ......

delphi ÔõÑù½«ucs2±àÂëת»»³ÉÖÐÎÄ

½ÓÊÕµ½µÄÎı¾ÄÚÈÝÊÇucs2±àÂë¸ñʽ£¬ÇëÎÊÔõÑùת»»³ÉÖÐÎÄ
°´ÎÒµÄÀí½â£¬UCS-2ÊÇ×Ö·û¼¯£¬¾ßÌåµÄ±àÂëÓÐUTF-8£¬UTF-16 (LE/BE)µÈ¡£
Èç¹ûÄãÓÃDelphi 2009¼°ÒÔÉϰ汾£¬¿ÉÒÔ¿´¿´TEncodingÀà¡£
btw. Äã˵µÄת»»³ÉÖÐÎÄÊÇɶÒâË ......

DelphiÖÐÊý¾Ý¿â²éѯµÄÒÉ»ó

×òÍíÔÚDelphiÊý¾Ý¿â²éѯÖÐÓöµ½ÁËÒ»¸öÒɻ󡣴úÂëÈçÏ£º
procedure TFormSearchAchievement.ComboBoxXYChange(Sender: TObject);
var
  XY : string;
begin
  XY := comboboxxy.Items[comboboxx ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ