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

DelphiÎļþ²Ù×÷³£Óú¯Êý

====================================================
Delphi²Ù×÷ÎļþµÄÒ»°ã²½Ö裺
1£©¹ØÁªÎļþ£º
 AssignFile(var F; FileName :string)£»
2£©³õʼ»¯Îļþ£º
 Append(var F :Text);   
 //ֻд£¬ÓÚÎļþ×îºó×·¼ÓÊý¾Ý
 Reset(var F [; RecSize :Word]);      
 //Ö»¶Á£¬Îļþ±ØÐë´æÔÚ£¬ÎļþÖ¸ÕëÖÃÓÚ¿ªÍ·
 //µÚ¶þ²ÎÊýÖ¸¶¨Ö¸ÕëÒÆ¶¯µÄ´óС£¬¶ÔÓÚÎÞÀàÐÍÎļþÓÐЧ
 //¶ÔÓÚÀàÐÍÎļþ£¬Ôò°´¾ßÌåÀàÐ͵ĴóС£¬¶øÎı¾ÎļþĬÈÏ128×Ö½Ú
 Rewrite(var F :File [; Recsize :Word]);
 //¸²¸Çֻд£¬ÈôÎļþÒÑ´æÔÚ£¬Ôòɾ֮֨½¨¿ÕÎļþд
3£©¶ÁдÎļþ£º
 Eof(var F):Boolean; //End of File? ÎļþÖ¸ÕëÊÇ·ñ´¦ÓÚÎļþ½áβ
 Eoln[(var F :Text)]:Boolean; //End of line?
 Seek(var F; N :Longint); //¶ÔÓÚÎı¾ÎļþÎÞЧ
 //ÒÆ¶¯ÎļþÖ¸ÕëN¸öµ¥Î»£¬NΪÕýÔòÏòÇ°ÒÆ£¬NΪ¸ºÔòÏòºóÒÆ
 SeekEof[(var F :Text)]:Boolean;
 //ͬEof£¬Çø±ðÔÚÓÚ±¾º¯ÊýºöÂÔ¿Õ°×·û
 
 SeekEoln[(var F :Text)]:Boolean;
 //ͬEoln£¬Çø±ðÔÚÓÚ±¾º¯ÊýºöÂÔ¿Õ°×·û
 FilePos(var F):Longint; //Îļþ±ØÐë´ò¿ª
 //»ñÈ¡ÎļþÖ¸Õ뵱ǰλÖã¬ÈôÔÚÎļþ¿ªÍ·Ôò·µ»Ø0
 FileSize(var F):Integer; //Îļþ±ØÐë´ò¿ª
 //»ñÈ¡Îļþ´óС£¬·µ»ØµÄ´óС²¢·Ç¸ù¾Ý×Ö½Ú¼ÆË㣬¶øÊǸù¾Ý´«µÝÊý¾Ýʱ¼Ç¼µÄ´óС¼ÆËã¡£¹ÊÓ¦ÏÈÉùÃ÷Ò»¸öÎÞÀàÐÍÎļþ²¢³õʼ»¯ÎªReset(F,1);ʹ¼Ç¼´óСΪ1×Ö½Ú£¬»òÕßÉùÃ÷charÀàÐÍ£¨1×Ö½Ú£©Îļþ£¬¼´£ºFile of char±äÁ¿
 Read(F, v1 [, v2, v3...vn]);
 //¶Áȡһ¸öÊý¾Ý´æ´¢ÓÚ²ÎÊýv1ÖУ¬ÈôÒ»´Î¶ÁÈ¡¶à¸öÊý¾Ý£¬Ôò¿É´ø¶à¸ö²ÎÊý¡£ÈôÉùÃ÷µÄÊÇÀàÐÍÎļþ£¬Ôò²ÎÊýµÄÀàÐͺÍÀàÐÍÎļþµÄÀàÐÍÒ»Ö£»ÈôÉùÃ÷µÄÊÇÎı¾Îļþ£¬Ôò²ÎÊý»ù±¾ÉÏ¿ÉÒÔÊÇÈκλù±¾Êý¾ÝÀàÐÍ¡£µ±¶ÁÈë¶à¸öÊýֵʱ£¬Read·½·¨½«¼Ù¶¨ÊýÖµÊÇÓÃÒ»¸ö»ò¶à¸ö¿Õ¸ñ¡¢ÖƱí·û£¨#9£©»ò»Ø³µ£¨#13#10£©¸ô¿ªµÄ£¬¶ø²»ÊǶººÅ¡¢·ÖºÅ»òÆäËü×Ö·û¡£
 Readln([var F :Text;] v1 [, v2, ...,vn]);
 //¶ÁȡһÐÐÊý¾Ý£¬Ö»ÊÊÓÃÓÚÎı¾Îļþ
 Write(F, v1 [, v2,...,vn]); //ÍùÎļþÖÐÌí¼ÓÄÚÈÝ
 Writeln([var F :Text;] p1 [, p2,...,pn]);
 //дһÐÐÊý¾Ý£¬Ö»ÊÊÓÃÓÚÎı¾Îļþ
4£©¹Ø±ÕÎļþ£º
 CloseFile(var F); 
 //½â³ýÎÄ


Ïà¹ØÎĵµ£º

delphi ½Å±¾ÒýÇæ±È½Ï

TMS Scripter£ºÖ§³ÖPascalºÍVBScriptÁ½ÖÖÓï·¨¡£ÓŵãÊÇÎĵµÆëÈ«¡¢Àý×ÓÆëÈ«£¬½Å±¾¿ÉÖ±½ÓÖ§³ÖDLL£¬¹Ù·½»¹ÌṩÁ˷ḻµÄIDE Debug¹¤¾ß¡¢µ¥Ôªµ¼³öº¯Êý¹¤¾ßµÈ£¬È±µãÊDZàÒëÔËÐнÏÂý¡£for ¿ÕÑ­»·1000Íò´Î£¬ÐèÒª10ÃëÖÓÒÔÉÏ¡£TMS ScripterÊÇÉÌÒµ¹²ÏíÈí¼þ¡£
       FastScript£ºÓùýFastReport±¨±íµÄÍ¬Ñ ......

Delphiµ÷ÓÃExcelµÄÆäËü¼¼ÇÉ

1>ÏòÖ¸¶¨µÄÇøÓò»òÐÎ×´Ìí¼Ó³¬Á´½Ó¡£
Óï·¨
±í´ïʽ.Add(Anchor, Address, SubAddress, ScreenTip, TextToDisplay)
±í´ïʽ   Ò»¸ö´ú±í Hyperlinks ¶ÔÏóµÄ±äÁ¿¡£
²ÎÊý
Ãû³Æ±ØÑ¡/¿ÉÑ¡Êý¾ÝÀàÐÍÃèÊö
Anchor
±ØÑ¡
Object
³¬Á´½ÓµÄλÖ᣿ÉΪ Range »ò Shape ¶ÔÏó¡£
Address
±ØÑ¡
String
³¬Á´½ÓµÄµØÖ ......

ÓÃDELPHI´´½¨DLLÎļþ£¬·â×°´°ÌåµÄʵÏÖ·½·¨ÊµÀý

ËäÊÇÔ­´´£¬µ«ÊÇÊDzο¼¹ý±ðÈ˵Ä×÷Æ·£¬È»ºó×Ô¼ºÖØÐÂдµÄ£¬Ä¿µÄÊÇÒª¸ø³õѧÕßÒ»¸ö¸üÈÝÒ×Ã÷°×¡£
ÓÃDELPHI´´½¨DLLÎļþ£¬·â×°´°ÌåµÄʵÏÖ·½·¨ÊµÀý£º
¼´Ò»¸ö³ÌÐò²»ÔÙÊǵ¥Ò»µÄÒ»¸öEXEÎļþÁË£¬¶øÊÇÓÉÒ»¸öEXEÎļþ¼ÓN¸öDLLÎļþ×é³É£¬ÕâÑù×öµÄÔ­ÒòÊÇ·½±ãÒÔºóµÄά»¤Óë¸üУ¬Ò²ÊÇ¿çÆ½Ì¨¿ª·¢µÄÖØÒªÒ»²½¡£
1£¬ ´ò¿ªDELPHI£¬Ð½¨Ò»¸öDl ......

DelphiµÄSocket±à³ÌÒª·Ö¼¸²½£¿

DelphiµÄSocket±à³ÌÒª·Ö¼¸²½£¿
2008-12-20 02:03:24
¡¡±êÇ©£ºDelphi Socket ±à³Ì¡¡¡¡¡¡[ÍÆË͵½¼¼ÊõȦ]
ClientSocket ºÍServerSocket
¼¸¸öÖØÒªµÄÊôÐÔ:   
1.clientºÍserver¶¼ÓÐportÊôÐÔ£¬ÐèÒªÒ»Ö²ÅÄÜ»¥ÏàͨÐÅ   
2.clientÓÐAddressÊôÐÔ,ʹÓÃʱÌîд¶Ô·½(server)µÄIPµØÖ·  & ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ