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

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¤×Ö·û´®¸ñʽ¡¢¶¯Ì¬Êý×é¡¢ÀàÀàÐÍÒÔ¼°Ö¸Õë¡£
¡¡¡¡½ÓÏÂÀ´ÎÒ
ÃÇÒª°ÑÎÒÃǵēÊý¾Ý¿â”ÎļþÁ


Ïà¹ØÎĵµ£º

DELPHI TXMLDocument¶ÁÈ¡XML³öÏÖÂÒÂëµÄÎÊÌâ

XMLÎļþ
<?xml version="1.0" encoding="utf-8"?>
.......
ÒòΪԭÒòºÜ¶à£¬ËùÒÔÕâ¸ö·½·¨²»Ò»¶¨Äܽâ¾öÎÊÌâ
XMLDocument1.LoadfromFile('test.XML');
XMLDocument1.Active:=TRUE;
XMLDocument1.Encoding:='gb2312';
memo1.Text:=XMLDocument1.XML.Text; ......

DELPHIÖеĿì½Ý·½Ê½Ò»ÀÀ(ÍêÈ«Õýʽ°æ)


 1.SHIFT+Êó±ê×ó¼ü    ÏÈÑ¡ÖÐÈÎÒ»¿Ø¼þ,°´¼üºó¿ÉÑ¡Öд°Ìå(Ñ¡Öпؼþºó°´EscЧ¹ûÒ»Ñù)
 2.Shift+F8          µ÷ÊÔʱµ¯³öCPU´°¿Ú¡£
 3.Shift+F10         µÈÓÚÊó±êÓÒ¼ü£¨Windows¿ì½Ý¼ ......

Delphi ´ò¿ªÎļþ¼Ð·½·¨

µÚÒ»ÖÖ·½·¨,ʹÓÃSelectDirectory º¯Êý ,ÔÚShellApiÖÐ
procedure TForm2.BtSelectPathClick(Sender: TObject);
var
    strCaption,strDirectory:String;
    wstrRoot:WideString;
    begin
    strCaption:='ÕâÊÇä¯ÀÀÎļþ¼ÐµÄ˵Ã÷ÎÄ×Ö£¬¿ÉÒÔ¸ù¾ÝÐèÒª½ ......

Delphi µÄ Dll º¯ÊýµÄ µ÷ÓÃ


Ò»¡¢Dll½¨Á¢
£¨Ò»£©DLLÏîÄ¿µÄ½¨Á¢
library mydll;
 
uses
base in 'base.pas';
 
exports
Triple name 'Tr';
 
{$R *.res}
 
begin
end.
 
£¨¶þ£©º¯Êýµ¥Ôª
unit base;
 
interface
 
uses windows;
 
function Triple(N:integer):integer;stdcall;
  ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ