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

delphi ÎÊÌâÇóÖú - Delphi / ÍøÂçͨÐÅ/·Ö²¼Ê½¿ª·¢

ÎÊÌâÊÇÕâÑù×ÓµÄ
ÎÒÔÚform1Öж¨ÒåÁËÒ»¸ösk1:tsocket
È»ºóÔÚform2ÖÐ
ÓÃsk1 ·¢ËͶ«Î÷ ·¢Íêºó socket ×Ô¶¯¹Ø±ÕÁË~
µ«ÊÇÔÚform1Öз¢¶«Î÷ Èç¹ûÎÒ²»ÔËÐÐ closesocket µÄ»° ÊDz»»á¶ÏµôµÄ
ÎÊÏ ÕâÊÇÔõô»ØÊÂ

ÁíÎÒÔÚ form2 Àï¼ÓÁ˸ö 
uses Unit1;
Ö±½Óµ÷ÓÃ sk1~
ÕâÑù×ÓÓ¦¸ÃûÎÊÌâ°É~
µ¥²½µ÷ÊÔÁËÏÂ~

type
  test_array=array[0..211] of Byte;
var
re:integer;  
message_headpack:array[0..3] of Byte;
  test_byte:array[0..207] of Byte;
  send_pack:test_array;
  psend_pack:^test_array;
~~~~~~~~~~~~~~~~~~~~
ǰ±ßÊÇЩ¸³ÖµÓï¾ä¾Í²»¸´ÖÆÁË
for i:=0 to sizeof(message_headpack)-1 do
  send_pack[i]:=message_headpack[i];
for i:=SizeOf(message_headpack)to SizeOf(send_pack)-1 do
  send_pack[i]:=test_byte[i-sizeof(message_headpack)];
re:=send(sk1,psend_pack^,Length(psend_pack^),0);
//µ¥²½ÔËÐе½ÕâÒ»²½ ¾Í·¢ÏÖÐÅÏ¢°ü·¢³öÈ¥ºó È»ºósocketÒ²×Ô¶¯¹Ø±ÕÁË~sk1ÊÇÌ×½Ó×Ö~ÎÒÔÚunit1Öж¨ÒåµÄ
  if(Re=SOCKET_ERROR)then
  begin
  ShowMessage('·¢ËÍ´íÎó');
  exit;
  end;
 form2.Release;
  close;

¸ßÊÖ°ïÎÒ¿´ÏÂ

¶¥ÆðÀ´~
Õâ¸öµ½µ×ÊÇÔõô»ØÊ°¡~
·þÎñÆ÷ÊÇÓÃCдµÄ
ÎÒÔÚunit1 Ï·¢ËÍ ÊDz»»á¶Ï¿ªµÄ~
µ«ÔÚunit2 Ï·¢ËÍ socket¾Í¶Ï¿ªÁË~

¼Ó¸öÊä³ö´íÎóÐÅÏ¢¿´ÏÂ

uses
  Winsock2;

try
  re:=send(sk1,psend_pack^,Length(psend


Ïà¹ØÎÊ´ð£º

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

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


ÎÞÈ˻شð£¿

×ö³É×ÊÔ´Î ......

¹ØÓÚDelphi IXMLDOMNodeList ±£´æ

var
FXmlDoc:IXMLDomDocument;
begin
ʹÓÃFXmlDoc.save('Îļþ·¾¶')£»
½á¹û·¢ÏÖ±£´æºóµÄ¸ÃÎļþÖÐÎÄÈ«²¿ÎªÂÒÂ룬ÈçºÎ½â¾ö
end£»
²Î¿¼Õâ¸ö
http://blog.csdn.net/jiangnanandi/archive/2008/11/28/3399804.aspx ......

DelphiÏà¹ØÎÊÌâ - Delphi / ÓïÑÔ»ù´¡/Ëã·¨/ϵͳÉè¼Æ


  ÔÚ°²×°Íê³ÉDelphiµÄʱºò£¬´ò¿ªDelphi½øÈë´°¿Ú£¬µãÔËÐеÄʱºòΪʲô×Ô¶¯Í£Ö¹ÔËÐÐÁË¡£
ʲôÒâ˼£¬ÊÇн¨µÄÓ¦ÓÃÔËÐÐÍ£Ö¹£¬»¹ÊdzÌÐòÍ£Ö¹ÁËÄØ¡£

ûÃ÷°×LZÒâ˼~~

ÒýÓÃ
ÔÚ°²×°Íê³ÉDelphiµÄʱºò£¬´ò¿ªDe ......

delphi Õ÷¼¯¸ßÊÖ·ÖÎö

СµÜ×î½ü×öÁ˼¸¸ö·þÎñ ·þÎñÔËÐÐÐèҪһЩ²ÎÊý ²ÎÊýÊÇͨ¹ýÒ»¸ö³ÌÐò½çÃæÐÞ¸ÄµÄ ²ÎÊý±£´æÔÚaccessÊý¾Ý¿âÖÐ ÏÖÔÚ³öÏÖÒ»ÁéÒìÏÖÏó µ¥¶ÀµÄ·þÎñÊÇ¿ÉÒÔ½øÐпØÖƵ썷þÎñµÄÍ£Ö¹ ÔÝÍ£µÈµÈ£©µ«ÊǶà¸ö·þÎñÒ»Æð¿ªÆô»á³öÏÖÒ»·þÎñ¿ª ......

DelphiÖÐDBGridÁж¨Î»ÎÊÌâ - Delphi / Êý¾Ý¿âÏà¹Ø

DBGridÖеÄÁбȽ϶à
ÔÚQueryˢкóÈç¹ûÈÃËüÏÔʾÔÚijһÐУ¿

ÒýÓÃ
DBGrid1.SelectedIndex := ÄãÒªÏÔʾµÄÄÇÒ»ÐÐ;
²»ºÃÒâ˼£¬ÎÒд´íÁË£¬ÊÇijһÁС£¡£¡£


ÒýÓÃ
²»ÊǺÜÃ÷°×,ºÜ¶àÁÐÓëÐÐÓ¦¸Ãû¹Ø°É
ÊÇ·ñÏëҪˢР......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ