delphi ×Ô¶¨ÒåÎļþ
±¾ÎÄתÔØ:http://rabbitfox.blog.sohu.com/29948084.html
http://delphi.about.com/od/fileio/a/fileof_delphi.htm
Ê×ÏÈÏò×÷Õß±íʾ¸Ðл£¡
¡¶ÀûÓÃDelphiµÄ“File Of
Type”´´½¨²¢¹ÜÀíÊôÓÚÄã×Ô¼ºµÄ“Êý¾Ý¿â”¡·
Ô×÷ÕߣºZarko Gajic
ÔÎÄ
ÔÚ£ºhttp://delphi.about.com/od/fileio/a/fileof_delphi.htm
Òë ÕߣºLihuaSoft
×öÈËÒªºñµÀ£¬×ªÔØÇë×¢Ã÷³ö´¦
£¨Òë
Õß×¢£º´ËÎIJ¢·ÇÖ±ÒëµÄ£¬¶øÊǾ¡Á¿°´ÕÕÔÎĵĽṹ£¬½áºÏÒëÕߵıà³ÌÌå»á£¬½øÐÐÁ˸ÅÒ룩
Ç°ÑÔ
¡¡¡¡ÔÚ³ÌÐòÖУ¬ÎÒÃÇÐèÒªÓÃÒ»¸ö;¾¶È¥°ÑһЩÓйæÂɵÄÐÅÏ¢´æ´¢ÔÚ´ÅÅÌÉÏ¡£²»ÄÜÓÃTXT¸ñʽµÄÎļþ©¤©¤ÒòΪËü²»ÊÇ»ùÓÚ“¼Ç¼”µÄ£¬¶øÇÒ¹ÜÀíºÜ²»·½±ã¡£
¡¡
¡¡BDE»òADOÒ²¾ÍÊÇ˵Paradox¡¢Access……°¦£¬²»ÁоÙÁË©¤©¤ÕâЩÎÒ¶¼²»ÏëÓã¬ÓÈÆä²»ÏëÓÃBDE¡£ÎÒÒªÓõÄÊÇASCIIÎı¾Îļþ¡£
DelphiÄÜ×öµ½Â𣿵±È»ÄÜ£¡Õâ¾ÍÊÇ“File Of”ÀàÐÍÎļþ£¬»òÕß˵files of some type/binary files¡£
¡¡
¡¡£¨ÒëÕß×¢£ºÓëËùÓеÄWin32×ÀÃæÓ¦ÓóÌÐò±àÒëÆ÷Ïà±È£¬DelphiÓÐÒ»¸öºÜ¶Àµ½µÄÌص㣺Ëü±àÒëµÄExe¿ÉÒÔ²»ÐèҪһЩ¹«¹²¶¯Ì¬Á´½Ó¿âµÄÖ§³Ö£¬¾¡¹ÜÒò´Ë
DelphiµÄEXEÎļþ¿ÉÄÜ´óÒ»µã¡£¶øVC¡¢C++Builder¡¢VFPµÈµÈÕâЩÎÒÓùýµÄ±àÒëÆ÷£¬È´²»ÊÇÕâÑù£¬ËüÃDZàÒëµÄEXEÍùÍùÐèÒª´ò°üһЩ
Dll²Å¿ÉÒÔÓá£ÄÇô£¬ÎÒÃÇÓÃDelphi¿ª·¢Êý¾Ý¿â³ÌÐòʱ£¬Ê¹ÓÃBDE¡¢ADOµÈµÈÒýÇ棬ȴÒò´Ë¸øDelphiÃÉÐß©¤©¤BDE¡¢ADOµÈµÈ£¬Ò»°ã¶¼ÐèÒª
µ¥¶À°²×°µ½²Ù×÷ϵͳÖÐÈ¥¡££©
¡¡¡¡ÏÂÃæ¾ÙÀýÑÝʾÕâ¸öÓ¦Óá£
Ê×ÏÈ
¡¡¡¡ÎÒÃÇÊ×ÏÈÒª¶¨ÒåÒ»¸ö»ùÀ࣬Ҳ¾ÍÊÇÒ»¸ö¼Ç¼½á¹¹£º
type
TMember = record
Name : string[10];
eMail :
string[20];
Posts : LongInt;
end;
¡¡¡¡È»ºóÉùÃ÷Ò»¸ö¼Ç¼¼¯£¬¼ÙÉèÓÐ5Ìõ¼Ç¼£º
var Members : array[1..5] of TMember;
¡¡¡¡
ÔÚÎÒÃǶÁдÎÒÃǵÄÊý¾ÝÐÅϢǰ£¬ÎÒÃÇÐèÒªÉùÃ÷Ò»¸ö»ùÓÚÎÒÃǼǼ½á¹¹µÄÎļþ±äÁ¿£º
var F : file of TMember;
¡¡¡¡
×¢£ºÔÚDelphiÀÎÒÃÇÉùÃ÷Ò»¸öÎļþ±äÁ¿µÄÒ»°ã¸ñʽ¾ÍÊÇ£º
var SomeTypedFile : file of SomeType;
¡¡
¡¡ÕâÀïËù˵µÄ»ùÀࣨSome Type£©£¬±ÈÈç¿ÉÒÔÊÇDouble¡¢Êý×é¡¢¼Ç¼¡£µ«²»ÄÜÊdz¤×Ö·û´®¸ñʽ¡¢¶¯Ì¬Êý×é¡¢ÀàÀàÐÍÒÔ¼°Ö¸Õë¡£
¡¡¡¡½ÓÏÂÀ´ÎÒ
ÃÇÒª°ÑÎÒÃǵēÊý¾Ý¿â”ÎļþÁ
Ïà¹ØÎĵµ£º
ÖØÔØ CreateParams ·½·¨¼´¿É
ÉùÃ÷£º
procedure CreateParams(var Params: TCreateParams);override;
procedure TForm2.CreateParams(var Params: TCreateParams);
begin
inherited;
Params.WndParent := 0;
end; ......
XMLÎļþ
<?xml version="1.0" encoding="utf-8"?>
.......
ÒòΪÔÒòºÜ¶à£¬ËùÒÔÕâ¸ö·½·¨²»Ò»¶¨Äܽâ¾öÎÊÌâ
XMLDocument1.LoadfromFile('test.XML');
XMLDocument1.Active:=TRUE;
XMLDocument1.Encoding:='gb2312';
memo1.Text:=XMLDocument1.XML.Text; ......
delphi±£´æ¶ÁÈ¡utf-8µÄÎı¾Îļþ
¸ø¿Í»§×öÁËÒ»¸öÅúÁ¿Ê¶±ðͼÏñ²¢ºÏ³ÉË«²ãpdfµÄ³ÌÐò£¬×îºó¿Í»§ÐèÒªÉú³ÉµÄͬʱ¸½´øÒ»·Ý¼Çʱ¾Îļþ£¬¾ÍÊÇOCR¹ýºóµÄÎı¾£¬²¢Ö¸¶¨utf-8¸ñʽµÄ¡£ÔÚ´¦Àíutf-8ʱ³öÏÖÁ˵ãСÎÊÌ⣬ÏÖÔÚ×ܽáÈçÏÂ
Ê×ÏÈ ÀûÓÃdelphi×Ô´øµÄUTF8Encodeº¯Êý£¬½«ÆÕͨ×Ö·ûת»»Îªutf-8±àÂë
´´½¨Ò»¸öÁ÷£¬MemoryStream»òFileStr ......
delphiºÜÔç¾ÍÒѾ¿ÉÒÔ½øÐÐÈý²ãµÄ¿ª·¢ÁË. µ«Ò»Ö±µ½ÏÖÔÚ, ÍøÉÏÕâ·½ÃæµÄ¶«Î÷Ì«ÉÙ ÁË. Ҫô̫ÀÏ, ÉõÖÁ²»ÍêÈ«ÕýÈ·. ÀýÈç:
ÈçºÎ½øÐжà±í¸üÐÂ(Ìá½»), ºÜ¶à»Ø¸´»¹ÊÇ˵ÓÃADOConnectionµÄÊÂÎñ, (Èç¹ûҪͬʱ¸üÐÂSQL SERVERºÍOracleÊý¾Ý¿âµÄ±íÔõô°ì).
µ±È»Ò²ÓÐ˵ÓÃSetComplete, SetAbortµÄ. µ«ËµµÄºÜ¼òµ¥, ÆäÖеÄ×¢ÒâÊÂÏîÓÖÊÇÊ ......
¹Ø¿ª·¢Ï°¹ßµÄһЩÏë·¨£¬ÈçöáÔÚºí£¬²»Í²»¿ì¡£¾¿Æä·¢Ìù¶¯»ú£¬µ±È»²»ÅųýÓÐÆÈ¡²ÎÓë·ÖµÄ¿ÉÄÜ£¬µ«ÁíÒ»·½Ã棬ҲϣÍûÄܸøͬÐУ¨ÄîXing£©ÕßÌṩһЩ½¨Ò飬»òÕ߲ο¼(Ï£Íû²»ÊÇÎóÈË×ÓµÜ)¡£Í¬Ê±£¬Ò²Ï£Íû¸÷λÄܹ»¾ÍÎÒµÄÕâЩªϰ£¬·¢±íÒ»µã¿´·¨£¬¸ø³öÅúÆÀºÍÖ¸ÕýµÄÒâ¼û¡£Ð»Ð»¡£
Ò»£®½¨Á¢¹¤³ÌĿ¼
&nbs ......