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

delphiÊý×éÖ®²ËÄñƪ


Êý×éÊÇ¿ÉÒÔͨ¹ýË÷ÒýÀ´ÒýÓõÄͬÀàÐÍÊý¾ÝµÄÁÐ±í¡£°´ÕÕ´æ´¢¿Õ¼äµÄ»ñÈ¡·½Ê½£¬Delphi
Ö§³ÖµÄÊý×éÀàÐÍÓÐÁ½ÖÖ£¬¼´¾²Ì¬Êý×éºÍ¶¯Ì¬Êý×é¡£Ëùν¾²Ì¬Êý×é¾ÍÊÇÔÚÉùÃ÷ʱ¾ÍÒѾ­È·¶¨´óСµÄÊý×éÀàÐÍ£¬¶ø¶¯Ì¬Êý×éÊÇÖ¸Æä´óСÔÚÉùÃ÷ʱ²»ÄÜÈ·¶¨µÄÊý×飬¶¯Ì¬Êý×éµÄ´óСÔÚʹÓÃʱȷ¶¨¡£
ÉùÃ÷¾²Ì¬Êý×éµÄ·½Ê½·Ç³£¼òµ¥£¬Ö»ÒªÖ¸Ã÷Êý×鳤¶ÈºÍÊý¾ÝÀàÐͼ´¿É£¬ÏÂÃæ¾ÍÊÇÉùÃ÷ÁËÒ»¸öÓÃÀ´´æ·Å×Ö·ûµÄÊý×飺
var Hello: array[0..5] of
char;
ÈÝÒ׿´³ö£¬Êý×éµÄÉùÃ÷Ã÷ÏÔ°üº¬3
¸ö²¿·Ö£¬¹Ø¼ü´Êarray
±íÃ÷ÕâÊÇÒ»¸öÊý×é±äÁ¿£¬¶ø[x..y]
±íÃ÷Êý×éµÄË÷ÒýÊÇ´Óx
µ½y
£¬¶øof
char
±íÃ÷Êý×éµÄ³ÉÔ±ÊÇ×Ö·ûÀàÐÍ¡£°´ÕÕÀàËÆµÄ·½·¨»¹¿ÉÒÔÉùÃ÷ÆäËûÀàÐ͵ÄÊý×飬ÏÂÃæ¾ÍÊÇÕâÑùµÄʾÀý´úÂ룺
var ScoreList: array[1..25] of
Integer;
var NameList: array[1..35] of
String;
ÉùÃ÷ÁËÊý×éºó£¬¿ÉÒÔͨ¹ýË÷ÒýÒýÓÃÊý×éµÄÔªËØ(
³ÉÔ±)
¡£¶øÊ¹ÓÃÊý×é³ÉÔ±µÄ·½·¨ÓëʹÓÃÕâÖÖÀàÐÍµÄÆÕͨ±äÁ¿ÀàËÆ£¬ÏÂÃæ¾ÍÊÇÒ»¶ÎʹÓÃ×Ö·ûÊý×éµÄʾÀý´úÂ룺
var Hello: array[0..5] of
char;
begin
 Hello[0] := ‘H’;
 Hello[1] := ‘e’;
 Hello[2] := ‘l’;
 Hello[3] := ‘l’;
 Hello[4] := ‘o’;
 Hello[5] := Chr(0);
 ShowMessage(Hello);
end;
ÕâÀïÉùÃ÷Á˼¸¸öÊý×飬ËüÃǶ¼ÊÇÖ»°üº¬Ò»¸öË÷Òý²ÎÊýµÄÊý×飬¼´Ò»Î¬Êý×é¡£DelphiÖ§³Ö¾ßÓиü¶àË÷Òý²ÎÊýµÄÊý×飬¼´¶àάÊý×é¡£ÏÂÃæ¸ø³öÒ»¶ÎÉùÃ÷¶þάÊý×éµÄʾÀý´úÂ룺
var Hello: array[0..5][1..10] of char;
·ÃÎʶþάÊý×é³ÉÔ±µÄ·½Ê½Óë·ÃÎÊһάÊý×éµÄ·½Ê½ÏàËÆ£¬Ö»Òª°´ÕÕÀàËÆµÄ·½Ê½Ö¸¶¨Á½¸öË÷Òý¾Í¿ÉÒÔ·ÃÎʶþάÊý×éµÄ³ÉÔ±£¬ÏÂÃæ¾ÍÊÇʹÓöþάÊý×éµÄʾÀý´úÂ룺
var Hello: array[0..5] of array[0..10] of char;
begin
 Hello[0][0] := ‘H’;
 Hello[0][1] := ‘e’;
 Hello[0][2] := ‘l’;
 Hello[0][3] := ‘l’;
 Hello[0][4] := ‘o’;
 Hello[0][5] := Chr(0);
 ShowMessage(Hello[0]);
end;
°´ÕÕÀàËÆµÄ·½·¨»¹¿ÉÒÔÉùÃ÷¾ßÓиü¸ßάÊýµÄÊý×飬ÕâÀï²»ÔÙ¸ø³öʵÀý¡£ÁíÍ⣬Delphi»¹Ö§³Ö·ÃÎʶþάÊý×é³ÉÔ±µÄÁíÍâÒ»ÖÖ·½·¨£¬ÏÂÃæ¾ÍÊÇʾÀý´úÂ룺
var Hello: array[0..5] of array[0..10] of char;
begin
 Hello[0,0] := ‘H’;
 Hello[0,1] := ‘e&r


Ïà¹ØÎĵµ£º

Delphi¿ª·¢ÈËÔ±µÄ±à³Ìϰ¹ß

¹Ø¿ª·¢Ï°¹ßµÄһЩÏë·¨£¬ÈçöáÔÚºí£¬²»Í²»¿ì¡£¾¿Æä·¢Ìù¶¯»ú£¬µ±È»²»ÅųýÓÐÆ­È¡²ÎÓë·ÖµÄ¿ÉÄÜ£¬µ«ÁíÒ»·½Ã棬ҲϣÍûÄܸøÍ¬ÐУ¨ÄîXing£©ÕßÌṩһЩ½¨Ò飬»òÕ߲ο¼(Ï£Íû²»ÊÇÎóÈË×ÓµÜ)¡£Í¬Ê±£¬Ò²Ï£Íû¸÷λÄܹ»¾ÍÎÒµÄÕâЩªϰ£¬·¢±íÒ»µã¿´·¨£¬¸ø³öÅúÆÀºÍÖ¸ÕýµÄÒâ¼û¡£Ð»Ð»¡£
Ò»£®½¨Á¢¹¤³ÌĿ¼
     &nbs ......

delphi ¿Ø¼þ°²×°


ÓÉÓÚ×é¼þÌṩµÄ·½Ê½²»Í¬£¬ËùÒÔ°²×°µÄ·½·¨Ò²ÊDz»Ò»ÑùµÄ£¬ÏÂÃæ¾ÍĿǰ³£¼ûµÄ¸÷ÖÖÐÎʽµÄ×é¼þµÄ°²×°·½·¨½éÉÜһϡ£
1¡¢Ö»ÓÐÒ»¸ödcuÎļþµÄ×é¼þ¡£dcuÎļþÊDZàÒëºÃµÄµ¥ÔªÎļþ£¬ÕâÑùµÄ×é¼þÊÇ×÷Õß²»Ïë°ÑÔ´Â빫²¼¡£Ò»°ãÀ´Ëµ£¬×÷Õß±ØÐë˵Ã÷´Ë×é¼þÊʺÏdelphiµÄÄÄÖÖ°æ±¾£¬Èç¹û°æ±¾²»¶Ô£¬ÔÚ°²×°Ê±¾Í»á³öÏÖ´íÎó¡£Ò²ÕýÊÇÒòΪûÓÐÔ´Â룬¸øÊ ......

delphi Ñ¡ÔñÎļþ¼Ð


function BrowseCallbackProc(Wnd: HWND; uMsg: UINT; lParam, lpData: LPARAM): Integer; stdcall;
begin
if uMsg = BFFM_INITIALIZED then
begin
SendMessage(Wnd, BFFM_SETSELECTION, 1, lpData);
SetWindowText(Wnd, 'Ñ¡ÔñÒ»¸öÄ¿±ê');
end;
Result := 0;
end;
//hdl: ´°¿Ú¾ä±ú
//Root: ¸ùÄ ......

DelphiÖÐÁ÷µÄʹÓ㨱ȽÏÈ«Ãæ£©

Delphi ÖÐÁ÷µÄʹÓÃ(1) Óà TMemoryStream(ÄÚ´æÁ÷) ÈëÃÅ
ǰÑÔ:
Ëùν"Á÷", ¾ÍÊÇÒ»¶ÎÊý¾Ý»òÊÇÒ»¿éÄÚ´æ;
ÔÚ½øÐÐÁ÷²Ù×÷ʱ, ÎÒÃDz»±Ø¹ØÐÄÁ÷ÖеÄÊý¾Ýµ½µ×ÊÇʲô; Ö»ÐèÒªÖªµÀÁ÷µÄ´óСºÍµ±Ç°µÄÖ¸ÕëλÖÃ. ËùÒÔÁ÷Ö»ÓÐÁ½¸öÊôÐÔ:
Size¡¢Position.
¶ÔÁ÷µÄ²Ù×÷, ²»¹ý¾ÍÊǶÁÈ¡ºÍдÈë. ËùÒÔÁ÷×îÖ÷ÒªµÄ·½·¨¾ÍÊÇ Read ºÍ Write.
Ôںܶ࿠......

Delphi¿ØÖÆExcel2000ÐĵÃ

(Ò») ʹÓö¯Ì¬´´½¨µÄ·½·¨
Ê×ÏÈ´´½¨ Excel ¶ÔÏó£¬Ê¹ÓÃComObj:
var ExcelApp: Variant;
ExcelApp := CreateOleObject( 'Excel.Application' );
1) ÏÔʾµ±Ç°´°¿Ú£º
ExcelApp.Visible := True;
2) ¸ü¸Ä Excel ±êÌâÀ¸£º
ExcelApp.Caption := 'Ó¦ÓóÌÐòµ÷Óà Microsoft Excel';
3) Ìí¼Óй¤×÷²¾£º
ExcelApp.WorkBooks.Add ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ