Delphi Êý×é Ïê½â
¼¼Êõ½»Á÷,DH½²½â. Ê×ÏÈÎÒÃÇÒªÖªµÀʲôÊÇÊý×é?Êý×éÊÇÒ»¶ÑÏàÍ¬ÌØÐÔÊý¾ÝµÄÒ»¸ö¼¯ºÏ,Ò²¾ÍÊÇÿ¸öÔªËØµÄÀàÐͱØÐëÊÇÒ»ÑùµÄ,µ±È»ÔÚÆäËûһЩÈõÓï·¨µÄÓïÑÔÀïÃæ,Êý×éµÄÔªËØ¿ÉÒÔÇ§Ææ°Ù¹Ö.
Àý×Ó: Var
A: Array[ 0..2 ] Of Integer ;
Begin
A[ 0 ] := 1 ;
A[ 1 ] := 1.0 ; //ÕâÀïÊÇ´íµÄ,ÒòΪÿ¸öÔªËØ¶¼±ØÐëÊÇIntegerÀàÐÍ
End ;
DelphiÖÐÊý×é·ÖÀà:
1 ¶¨³¤ºÍ²»¶¨³¤.
¶¨³¤Êý×é:Ò²¾ÍÊdz¤¶ÈÔÚÉùÃ÷µÄʱºò¾ÍÈ·¶¨ÁË,ºóÃæÊDz»ÄܸıäµÄ,¶øÔÚ¶¨³¤Êý×éÖÐ,ÆðʼÐòºÅ²»±Ø´Ó0¿ªÊ¼,¿ÉÒÔ×Ô¼º¶¨.ÀýÈç:
Var
A: Array[ 2..3 ] Of Integer ;
Begin
A[ 2 ] := 1 ;
SetLength(A,3);//ÕâÀï»á³ö´í,¶¨³¤Êý×é²»ÄÜÔÙ·ÖÅä
End ;
´ÓÉÏÃæÎÒÃÇ¿ÉÒÔ¿´µ½ÆðʼÐòºÅÊÇ2,µ«ÊDz½³¤ÊÇ1,ÊDz»ÄܸıäµÄ.ΪʲôÎÒÃÇ¿´µ½ºÜ¶àÊý×éµÄÆðʼÐòºÅ¶¼ÊÇ0ÄØ?ϰ¹ß¶øÒÑ.´ó¼Ò¶¼Ï°¹ßÔÚ²ÞËùÀïÃæÈ¥ÐêÐê,¶øÄãÒ»¸öÈËϰ¹ßÔڹ㳡ÉÏÃæÐêÐê,ÄÇô´ó¼Ò¶¼»á˵Äã²»ÎÄÃ÷ÁË.µ«ÊÇÈç¹û´ó¼ÒÒ»¿ªÊ¼¶¼ÊÇÔڹ㳡ÉÏÃæÐêÐêµÄ»°,²»ËµÁËÌ«¶ñÐÄÁË.
À´¿´Ò»¸öÌØÊâµÄÓ÷¨:
type
THuangJacky = (hjA,hjB,hjC);
const
//Ó÷¨1
B:array[0..2] of string= ('A','B','C');
//Ó÷¨2
C:array[THuangJacky] of string= ('A','B','C');
Var
H:THuangJacky;
S:string;
Begin
S:=B[Ord(H)];
S:=C[H];
//B[H] ºÍ C[1]¶¼»á³ö´í
End ;
Ó÷¨1 ºÍÓ÷¨2Äã¾õµÃÄÇÖÖÓÃ×ÅˬһЩ?
´ÓÉÏÃæÀý×Ó¿ÉÒÔ¿´³öÀ´Ö»ÒªÊÇÐòÊýÀàÐͶ¼¿ÉÒÔµ±Êý×éµÄÐòºÅ.µ«ÊÇÎÒÃÇÓõÄʱºòÐòºÅ¾Í±ØÐëÊÇÉùÃ÷µÄÄÇÖÖÐòÊýÀàÐÍ,ËùÒÔÉÏÃæ´úÂë×¢ÊÍÖвŻáд³ö2ÖÖ´íÎóµÄÇé¿ö.
²»¶¨³¤Êý×é:¶¯Ì¬Êý×é,Ò²¾ÍÊÇÉùÃ÷µÄʱºòûÓÐ˵³¤¶ÈÊǶàÉÙ,ÔÚʹÓÃǰ±ØÐëÉùÃ÷,³¤¶È¿ÉÒÔÔÙ·ÖÅä.ÐòºÅ±ØÐë´Ó0¿ªÊ¼.¿´¸ö¼òµ¥µÄÀý×Ó
Var
A: Array Of Integer ;
Begin
SetLength( A, 3 ) ; //Êý×éÒ»¹²ÓÐ3¸öÔªËØ
A[ 0 ] := 1 ;
A[ 1 ] := 2 ;
A[ 2 ] := 3 ;
//A[3]ûÓÐËü,ÓÐËüµÄ»°,ÄãÊýһϼ¸¸öÁË?²»»áÊýÊý,ÄÇÎÒÍÆ¼öÄãÈ¥½ÖµÀ¿ÚСѧ¿´Ò»ÏÂ
SetLength( A, 4 ) ; //Èç¹û±ä³¤³¤¶È,Ö±½ÓÔö¼ÓºóÃæµÄÔªËØ
A[ 3 ] := 4 ; //ÏÖÔÚÓÐËüÁË.
SetLength( A, 3 ) ; //Èç¹û³¤¶È±ä¶Ì,³¬³ö²¿·Ö»á±»È¥µô
// A[3]ÓÖûÓÐËüÁË
End ;
ÓÐʱºò´ó¼ÒÕâÑùÒªÏÈÉ趨³¤¶È,È»ºóÔÙ¸³Öµ,ÊDz»ÊǺÜÂé·³?ûÓÐÒ»ÆøºÇ³ÉµÄ¸Ð¾õ.ºÃ°É,ÔÙ˵һÕÐ:
Type
TA = Array Of Integer ;
Var
A: TA ;
Begin
A := TA.Create( 1, 2, 3 ) ;
//´ËÕÐÇëÎðÔÚD7ÉÏÃæÊ¹Ó
Ïà¹ØÎĵµ£º
Ò»¡¢¸ÅÊö¼°Ê¾Àý´úÂë
DelphiÖаüÀ¨Ðí¶àÒѾ·â×°ºÃµÄÀ༰¿Ø¼þ£¬ÆäÖеķǿÉÊÓ»¯¿Ø¼þ¿âÒÔ¹¦ÄÜ·½Ê½»®·Ö¿É´¦ÀíÖî¶àÓ¦ÓÃÐèÇó¡£ÈôʹÓÃC£«£«ÊµÏÖϵͳʱ¶ÔijЩ¹¦Äܼòµ¥µ÷ÓÃdelphiÖÐÏֳɵĿâʱ¼´¿É¡£Òò´Ë½«delphiÖеĿâÒÔDLLÐÎʽ·â×°ºÃÖ®ºóÈçºÎ½«·½·¨µ¼³ö¿É¹©C£«£«µ÷ÓÃÊDZ¾ÎļǼµÄÖØµã¡£C£«£«µ÷Óõķ½Ê½ÓжàÖÖ£¬ÔÚÕâÀïÖ»ÌÖÂÛÒ»ÖÖ¾² ......
ÓÃDelphi×÷µÄ³ÌÐòµÄÔ´´úÂëÖг£¼ûµÄÎļþÀ©Õ¹Ãû£¬²¢¸ø³öÁËÕâЩÎļþÀ©Õ¹ÃûµÄÒâÒ壬ÒÔ±ãÔ´´úÂë¹ÜÀíʱ×÷Ϊ²ÎÕÕ£¬À©Õ¹ÃûÒÔ×ÖĸΪÐò£¨²»ÐèÒª½øÔ´´úÂë¿â²»±íʾ²»ÐèÒª½ø¿â£©¡£
¡¡¡¡~*
¡¡¡¡DelphiÉú³ÉµÄ±¸·ÝÎļþ£¬ÔÚ°æ±¾¿ØÖƿ⼰·¢²¼´úÂëÖв»Ó¦¸Ã³öÏÖÕâЩÎļþ£¬Èç¹ûÐÞ¸ÄÁËij¸öÎļþÈ´ÒòijЩÔÒòûÓб£´æµÄ»°£¬¿ÉÒÔ³¢ÊÔʹÓÃÕâЩÎļþ» ......
TDXDraw DirectDraw ºÍ Direct3D ×é¼þ
TDXDIB ÈÝÄÉDIB£¨É豸ÎÞ¹ØÎ»Í¼£¬Device Independent Bitmap£©µÄ×é¼þ
TDXImageList ͼƬÁбí×é¼þ
TDX3D Direct3D ×é¼þ £¨ºÍTDXDrawÒ»ÆðʹÓã©
TDXSound DirectSound ×é¼þ
TDXWave ÈÝÄÉ Wave£¨²¨ÐÎÒôƵ ......
²éÕÒÁíÍâÒ»¸ö´°¿ÚµÄ¾ä±ú£º handle := FindWindow(nil,PChar('´°¿ÚµÄ±êÌâ'));//²éµ½´°Ìå¾ä±ú
²éÕÒ×Ó´°Ì壺childHandle := FindWindowEx(handle,0,'×Ó´°ÌåÀà','×Ó´°Ìå±êÌâ');
ÁíÍâÓиöö¾Ù×Ó´°ÌåµÄAPI£¬EnumChildWindows(Ö÷´´Ìå¾ä±ú,@»Øµ÷º¯Êý,Óû§²ÎÊý);
ÓÃÕâ¸öº¯ÊýÐèÒª×Ô¼ºÐ´Ò»¸ö»Øµ÷µÄº¯Êý£¬±ÈÈ磺
function EnumChil ......