Delphiµ÷ÊÔDLL ²»Äܵ÷ÊÔ ²»ÄܽøÈëµ÷ÊÔ ×¢Ò⣡£¡£¡
ÈçºÎµ÷ÊÔDLL£¬ÔÚÕâÀï¾Í²»ÔÙ׸ÊöÁË£¬µ«ÊÇ£¬½ñÌì¾ÍÅöµ½ÁËÒ»¸öÌØ±ðÆæ¹ÖµÄÎÊÌ⣬²ÎÊýÉèÖÃÕýÈ·£¬¾ÍÊDz»Äܵ÷ÊÔ£¿£¿ ͨ¹ýÉÏÍø²é×ÊÁÏ£¬·¢ÏÖÁËÎÊÌ⣬עÒ⣺
1£¬ ½«ProjectÖ÷²Ëµ¥µÄProject Options¶Ô»°¿òµÄCompilerÒ³ÃæDebuggingÑ¡ÏîÖÐµÄ Debug informaton¡¢Local symbols¡¢Assertions¸´Ñ¡¿òÑ¡ÖÐ
2£¬½«ToolsÖ÷²Ëµ¥µÄDebugging options¶Ô»°¿ò-->×óϽÇIntegrated debugging¸´Ñ¡¿òÑ¡ÖÐ
×¢ÒâÁË£¬ Õâ¸öÎÊÌâÀ§ÈÅÁËÎÒÒ»ÏÂÎ磡£¡£¡
Ïà¹ØÎĵµ£º
Delphi 2010ֻʣÏÂÁùÌìµÄÊÔÓÃÆÚÁË,15ÌìµÄÊÔÓÃÆÚ¹ýµÃÕæ¿ì.°Ù¶ÈÁ˺ܾÃÒ²ÒÀ¾ÉδËÑË÷µ½ÆÆ½â²¹¶¡,¿´À´Õâ°æ±¾µÄ·ÀµÁ°æ¹¤×÷×öµÃȷʵ²»´í.ÎÞÄÎÖ®ÏÂÖ»ºÃ×Ô¼º¶ÔËü×ö×öÊÖ½ÅÁË.
²âÊÔÁËÒ»ÏÂ,delphiÖ»ÓÐÔÚÆô¶¯³ÌÐòµÄʱºò°Ñʱ¼ä¼Ç¼¸ø¸üе½µ±Ç°ÈÕÆÚ,ϵͳÄÚ²¢²»×¤ÁôÏàÓ¦µÄ ......
Chr ½«Ò»¸öÓÐÐòÊý¾Ýת»»ÎªÒ»¸öANSI×Ö·û
Ord ½«Ò»¸öÓÐÐòÀàÐÍֵת»»ÎªËüµÄÐòºÅ
Round ת»»Ò»¸öʵÐÍֵΪËÄÉáÎåÈëºóµÄÕûÐÍÖµ
Trunc ת»»Ò»¸öʵÐÍֵΪСÊý½Ø¶ÏºóµÄÕûÐÍÖµ
Int ·µ»Ø¸¡µãÊýµÄÕûÊý²¿·Ö
IntToStr ½«Êýֵת»»Îª×Ö·û´ ......
¼¼Êõ½»Á÷,DH½²½â. Õâ¸öÊÇÔÚCSDNÉÏÃæ¿´¼ûµÄÎÊÌâ.ÎÒ˵˵×Ô¼ºµÄÏë·¨. procedure TForm1.btn1Click(Sender: TObject);
var
Str:String;
begin
Str:='abc' ;
Str:=str+'d';
str:=copy(Str,1,3);
str:=UpperCase(str);
end;
ÎÊÌâ1´ð°¸:2010ÏÂ
Unit4.pas.29: begin
005144E0 55 p ......
ÍøÉÏDownµÄÒ»¸öµ¥Ôª.×Ô¼º¸ÄÁËÏÂ. unit utCRC32;
interface
uses
Windows,SysUtils,Classes;
const //Crc32±í
Crc32Tab: Array[0..$FF] of LongInt =
($00000000, $77073096, $ee0e612c, $990951ba, $076dc419, $706af48f,
$e963a535, $9e6495a3, $0edb8832, $79dcb8a4, $e0d5e91e, $97d2d988,
$0 ......