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);
//½â³ýÎÄ
Ïà¹ØÎĵµ£º
×ªÔØ×Ô£ºhttp://www.cnblogs.com/jdmei520/archive/2009/06/17/1505053.html
Webservice¼¼ÊõµÄ³öÏÖ½«¸÷ÖÖ¿ª·¢¼¼ÊõºÍÓïÑÔÍêÈ«µÄÈÚºÏÁË£¬ÏÂÃæ¾ÍÕâÖÖÈÚºÏÔÚC#ºÍdelphiÖ®¼äµÄ½»»¥×öÒ»´ÎÈ«ÃæµÄÌåÏÖ
1.ʹÓÃC#´´½¨Ò»¸öWebservice·þÎñ¡£
ʹÓÃvs2005µÄÄ£°å´´½¨C#µÄwebservice·Ç³£ÈÝÒס£ÔÎļþÈçÏÂ:
[WebService(Namespace  ......
dynamic¾ÍÊÇËüÊǶ¯Ì¬·½·¨£¬Ã»Óо²Ì¬µØÖ·£¬ËùÒÔËÙ¶ÈÂýÒ»µã
virtualÊÇÐé·½·¨£¬Èç¹ûÔÚ»ùÀàÖв»ÉùÃ÷³ÉÐé·½·¨µÄ»°£¬¼Ì³Ðºó£¬¸Ã·½·¨»áÌáʾһ¾¯¸æÐÅÏ¢£¬°Ñ»ùÀàÖз½·¨ÆÁ±ÎµôÁË
---------------------------------------------------------------
¶¯Ì¬£¨Dynamic£©ºÍÐéÄ⣨Virtual£©ºó¶¼¿ÉÒÔʹÓÃOverride¹Ø¼ü×ÖÔÚÅÉÉúÀàÖжԶÔÓ¦ ......
delphiµ÷ÓÃÑ¡ÔñĿ¼¶Ô»°¿ò
¾³£¼ûÍøÉÏÓÐÈËÎÊÑ¡ÔñĿ¼¶Ô»°¿òµÄ¿Ø¼þ£¬ÆäʵֻÓÃÒ»¸öº¯Êý¾Í¿ÉÒÔʵÏÖ¡£
×¢ÒâÒýÓÃ Filectrl µ¥Ôª
use Filectrl;
procedure TForm1.Button1Click(Sender: TObject);
var
Dir: String;
begin
SelectDirectory('Select a directory', '', Dir);
ShowMessage(Dir);
end; ......
Ò»¡¢Formatº¯ÊýµÄÓ÷¨
FormatÊÇÒ»¸öºÜ³£Óã¬È´ÓÖËÆºõºÜ·³µÄ·½·¨£¬±¾ÈËÊÔͼ¶ÔÕâ¸ö·½·¨µÄ°ïÖú½øÐÐһЩ·Ò룬ÈÃËüÓÐÒ»¸öÍêÕûµÄ¸Åò£¬ÒÔ¹©´ó¼Ò²éѯ֮Óãº
Ê×ÏÈ¿´ËüµÄÉùÃ÷£º
function Format(const Format: string; const Args: array of const): string; overload;
ÊÂʵÉÏFormat·½·¨ÓÐÁ½¸öÖÖÐÎʽ£¬ÁíÍâÒ»ÖÖÊÇÈý¸ö²ÎÊýµÄ£¬Ö ......