1¡¢DelphiÕýÔò±í´ïʽѧϰ
DelphiÕýÔò±í´ïʽѧϰ£¬²Î¿¼CSDNÍòÒ»ÀÏʦµÄBLOG¡¢CSDN¡¢ÍøÂç×ÊÁÏÒÔ¼°´øÔ´ÂëµÄTPerlRegEx£¬ÔÚ´Ë×¢Ã÷£¬ÒÔºó²»ÔÙ˵Ã÷£¬ÔÚЩ¸ÐлGoogleÀÏʦºÍ°Ù¶ÈÀÏʦ
°²×°£º
ÏÂÔØµØÖ·£ºhttp://download.csdn.net/source/1668436
1¡¢°²×°.dpkÎļþ£¬ÔÚLibaryÖÐÌí¼ÓTPerlRegExµ¥Ôª´æ·Å·¾¶
2¡¢ÔËÐгÌÐòǰ¸´ÖÆpcrelib.dllµ½C:\WINDOWSÏÂ
СÊÔ£º
procedure TForm1.FormCreate(Sender: TObject);
var
reg: TPerlRegEx; //ÉùÃ÷ÕýÔò±í´ïʽ±äÁ¿
begin
reg := TPerlRegEx.Create(nil); //½¨Á¢
reg.Subject := 'GoodBoy is You!'; //ÕâÊÇÒªÌæ»»µÄÔ´×Ö·û´®
reg.RegEx := 'You'; //ÕâÊDZí´ïʽ, ÔÚÕâÀïÊÇ×¼±¸Ìæ»»µôµÄ×Ó´®
reg.Replacement := 'Me'; //ÒªÌæ»»³ÉµÄд®
reg.ReplaceAll; //Ö´ÐÐÈ«²¿Ìæ»»
ShowMessage(reg.Subject); //·µ»ØÌæ»»½á¹û: GoodBoy is Me
FreeAndNil(reg); //»ò reg.Free
end;
//License Version 1.1
//Delphi 7.0
procedure TForm1.btn1Click(Sender: TObject);
var
Reg : TPerlRegEx;
begin
Reg := TPerlRegEx.Create(nil);
with Reg do
begin
Subject := 'ÎÒ°®DELPHI, µ«Delphi²»°®ÎÒ--Delphi!'; //Ä¿±ê×Ö·û´®
RegEx := 'Delphi'; //ÒªÌæ»»µÄ×Ö·û´®
Replacement := 'Ëü'; //Ìæ»»ºóµÄ×Ö·û´®
Options := [preCaseLess]; //²»Çø·Ö´óСд
ReplaceAll; //È«²¿Ìæ»»
ShowMessage(Subject);
FreeAndNil(Reg);
end;
//ÉèÖÃOptions := [preCaseLess];ÖÐÎÄÒ²¿ÉÒÔÌæ»»
end;
Ïà¹ØÎĵµ£º
Delphi²Ù×÷INIÎļþ²½ÖèÈçÏ£º
-------------------------------------
1£©ÔÚUsesÖÐÌí¼ÓiniFileµ¥Ôª£»
2£©ÉùÃ÷TiniFile¶ÔÏó£»
3£©´´½¨TiniFile¶ÔÏó£»
----------------try------------------
4£©INIÎļþ¶Áд²Ù×÷£»
--------------finally----------------
5£©ÊÍ·ÅTiniFile¶ÔÏó£»
---------------end--------------- ......
// ÅжÏÊÇ·ñÊÇÊýÖµÐÍ By yangxiao 2007.7.21
function isNumeric(strText: WideString): Boolean;
var
s: string;
i, l, p: Integer;
begin
Result := False;
l := Length(strText);
if l = 0 then Exit;
s := '';
for i:=1 to l do
......
¿ª·¢²½Ö裺
1¡¢´´½¨ActiveX Library¹¤³Ì¡£
2¡¢´´½¨COM Object¡£
3¡¢´´½¨Type Library£¬²¢´´½¨ÏàÓ¦½Ó¿Ú¡£
4¡¢´´½¨½Ó¿Ú¶ÔÓ¦µÄº¯ÊýºÍʵÏÖ¡£
¾ßÌåÈçÏ£º
1¡¢´´½¨ActiveX Library¹¤³Ì¡£
new|other|activeX|activeX library
Delphi»á×Ô¶¯Éú³É¿ò¼Ü´úÂ룬ֱ½Ó±àÒëµÄ»°¾Í¿ÉÒԵõ½Ò»¸ödllÎļþÁË£»
Èç¹ûÏë±àÒë³öÀ´µÄÊÇocxÎÄ ......
Ò»ÌáÆð»ùÓÚWeb Services¼¼ÊõµÄÓ¦ÓóÌÐò¿ª·¢£¬Ò»°ãÈËÊ×ÏÈÏëµ½µÄ¿ª·¢¹¤¾ßÊÇVs.net£¬Æäʵ×÷Ϊ¿ìËÙÓ¦ÓóÌÐò¿ª·¢¹¤¾ß(RAD)µÄÀÏ´ó£¬Delphi´Ó6.0¾Í¿ªÊ¼Ö§³ÖWeb ServicesµÄ¿ª·¢ºÍÓ¦ÓÃÁË£¬±¾ÎÄͨ¹ýʹÓÃDelphi 7.0µ÷ÓÃÐÂÀË·¢ËͶÌÐŵÄWeb Service½øÐжÌÐÅÓ¦ÓóÌÐò¿ª·¢ÕâһʵÀýÏêϸµÄ½éÉÜÔÚDelphiÖÐÈçºÎ¿ª·¢»ùÓÚWeb ServicesµÄÓ¦ÓÃϵͳ¡ ......
delphiÖÐSynchronizeÕâ¸ö¶«¶«ÓÐʲôÓã¿ÎÒÖªµÀÊÇÏß³Ìͬ²½Ê¹ÓõÄ
ÊÇ·ñÊÇÒ»¸öº¯Êý»ò±äÁ¿£¬µ±Ò»¸öÏß³ÌÔÚʹÓÃʱ£¬Èç¹ûÕâ¸öº¯ÊýʹÓÃÁËSynchronizeÐÞîߵϰ¾Í²»ÔÊÐí±ðÒ»¸öÏß³ÌÀ´µ÷ÓÃÕâ¸öº¯Êý
1Â¥£º±ðµÄÏ̻߳áµÈ´ý¸Ã²Ù×÷Íê³Éºó²ÅÄܼÌÐø
2Â¥£ºÄã˵µÄ»ù±¾ÊÇÕâ¸öÒâ˼¡£ËüµÄÄ¿µÄÊDZÜÃâ¶à¸ö×ÓÏß³Ìͬʱ·ÃÎÊÖ÷Ïß³Ì×ÊÔ´¡£
ʾÀý£º
......