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

delphi ´ò¿ªÎļþ£¬²¢¶¨Î»µ½Ö¸¶¨×Ö·û´®ËùÔÚλÖÃ

¾ÙÀý£º
ÎļþÃû£ºcopyFiles
ÎļþÄÚÈÝ£ºcopy1 £ºÂÔ
          copy2 £ºÂÔ
          copy3 : ÂÔ
          ¡£¡£¡£¡£¡£
          copy1000£ºÂÔ
ÊäÈ룺copy55 Ôò´ò¿ªÎļþcopyFiles£¨ÕâµãÇë²»ÓÃÀí»á£©£¬²¢¶¨Î»µ½copy55ËùÔÚµÄÐÐ

ÓÃshellExecute£¨£©Ã²ËÆÖ»ÄÜ´ò¿ªÎļþ £¬ÒªÈùâ±ê¶¨Î»µÄ»°Õ¦Õû£¬ÓÐɶAPIº¯Êý¿ÉÓ𡣿
pos()copy55µÄλÖã¬SelectStart()

ʲô½Ð¡°ÒªÈùâ±ê¶¨Î»¡±£¿

ÆÚ´ý´ð°¸¡£¡£¡£¡£¡£¡£¡£¡£¡£¡£¡£¡£¡£¡£¡£¡£

¹Ø×¢.....................

ÒýÓÃ
ʲô½Ð¡°ÒªÈùâ±ê¶¨Î»¡±£¿


Õâ¸öÂ²»¸æËßÄã¡£

ÒýÓÃ
ʲô½Ð¡°ÒªÈùâ±ê¶¨Î»¡±£¿


¾ÍÊÇÎı¾Îļþ´ò¿ªºóµÄ¹â±ê ±à¼­Îı¾Ê±Ò»ÉÁÒ»ÉÁµÄÄǸö£º'|'

²»ÊÇÌ«Ã÷°×ÄúµÄÒâ˼!!!

¼òµ¥Ëµ£¬
ÆðÒò£ºÏÖÔÚÓиöÈí¼þ£ºÊäÈëÎı¾ÎļþÃû(copyFiles)¾Í»á°ïÄã´ò¿ª¶ÔÓ¦µÄÎļþ¡£´ò¿ªÎı¾Îļþºó£¬Èç¹ûÄÚÈݺܶ࣬ÄãÒªÕÒµ½ÏëÒª¿´µÄcopyN£¬¾ÍÐèÒªÏÂÀ­È¥ÕÒ£¬»òÕßctrl+F²éÕÒ¶¨Î»¡£Ì«Âé·³ÁË¡£
ËùÒÔÎÒÏë¸Ä½øÒ»Ï£¬ÊäÈëcopyN Ò»´ò¿ªÕâ¸öÎļþ¾ÍÖ±½Ó¶¨Î»µ½copyN.
¸÷λ¿´¹Ù£¬ÎÒ½²Ã÷°×ÁËÂð£¿


ÄãÓС°ÏÖÔÚÓиöÈí¼þ¡±Õâ¸öÈí¼þµÄÔ´´úÂëÂð£¿

1.Èç¹ûÓУ¬¿´¿´ÏÔʾ copyFiles µÄÎļþÄÚÈݵÄ×é¼þÊÇʲô×é¼þ£¬È»ºó²ÅÄܶÔÖ¢ÏÂÒ©£¨Ïë°ì·¨£©¡£

2.Èç¹ûûÓÐÔ´´úÂ룬ֻÓÐ EXE ³ÌÐòµÄ»°£¬ÓÃÏûÏ¢¶¨Î»°É£¬ÄÇÒ²Òª¿´Êµ¼ÊÇé¿öµÄ¡£

Delphi(Pascal) code



Code


Ïà¹ØÎÊ´ð£º

DELPHIÕâÖÖÇé¿öÔõô°ì£¿ - Delphi / Windows SDK/API

¾ÍÊÇÒ»¸ö·þÎñ¶ËºÍÒ»¸ö¿Í»§¶Ë£¬Àï±ßÓÐһЩ¹²Óõ¥Ôª £¬ÎÒÔÚ ¹¤³ÌµÄSEARCH PATHÀïÉèÖõÄ·¾¶£¬
Àï±ßÓиö½á¹¹Ì壬ÎÒÔÚ·þÎñ¶Ë´ò¿ª£¬¼ÓÁ˳ÉÔ±£¬µ«ÊÇÎÒÔÚ¿Í»§¶ËÆäËûµ¥Ôª·ÃÎʲ»µ½ÎÒмӵģ¬ÎÒÔÚ¿Í»§¶Ë´ò¿ªÄǸöµ¥Ôª£¬È·Êµ¼ÓÁ ......

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

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


ÎÞÈ˻شð£¿

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

VC Delphi ÄÚ´æËÙ¶È±È½Ï - VC/MFC / ·Ç¼¼ÊõÀà

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 ......

Çë½ÌÏ£¬ÓÃDELPHI×öSOHUµÄ - Delphi / ·Ç¼¼ÊõÇø

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

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

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

ѧϰѧϰ¡£

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

xml´´½¨ºóÈçºÎÏú»Ù? - Delphi / ÍøÂçͨÐÅ/·Ö²¼Ê½¿ª·¢

xml := CreateOleObject('Microsoft.XMLHTTP');
  xml.Open('GET','http://www.google.com', False);
  xml.Send;
  xml.responseText;
ʹÓÃxml.responseText¿ÉÒÔ»ñÈ¡ÍøÒ³Ô´Âë,µ«ÊÇÔÙ´Î ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ