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

delphiÖйØÓÚstringgridÊý¾ÝÏÔʾ

ÎÒµÄÇé¿öÊÇÕâÑù£¬ÎÒÓÐÒ»¸östringgrid£¬ÏÔʾ4ÐУ¬Êý¾Ý¿âÖÐÓÐ100ÐУ¬ÒªÇóÈí¼þÔËÐÐʱÏÈÏÔÊ¾Ç°Ãæ4ÐУ¬È»ºó¸ô5ÃëÖкó¿ªÊ¼¸üÐÂÏÔʾµÄÊý¾Ý£¬ÔÚµÚÒ»ÐÐÏÔʾµÚ¶þÌõ¼Ç¼£¬µÚ¶þÐÐÏÔʾµÚÈýÌõ¼Ç¼£¬¡­¡­µÚËÄÐÐÏÔʾµÚÎåÌõ¼Ç¼£¬ÒÀ´ÎÏòÉϹö¶¯£¬Ö±µ½ÏÔʾÍê×îºóÒ»Ìõ¼Ç¼£¬ÔÙÖØÐ´ӵÚÒ»Ìõ¼Ç¼¿ªÊ¼ÏòÉÏÏÔʾ¡£
»òÕßÒ²¿ÉÒÔÕâÑùÏÔʾ£¬5ÃëºóÖ±½ÓÔÚµÚÒ»ÐÐÏÔʾµÚÎåÌõ¼Ç¼£¬¡­¡­µÚËÄÐÐÏÔʾµÚ°ËÌõ¼Ç¼£¬È»ºó5ÃëºóÏÔʾ9¡«12Ìõ¼Ç¼¡£

ÕâºÃ°ìѽ,Óøötimer¼ÓÉÏÒ»¸ö¼ÆÊýÆ÷¾ÍÐÐÁË,µ½Ê±×Ô¶¯Ë¢ÐÂÒ»ÏÂ

Ч¹û¿Ï¶¨Ã»ÄãÏëÏóµÄÄÇôºÃ£¬Òª¹ö¶¯»¹Êǽ¨Òé×Ի棬°´ÏñËØ¹ö¶¯²Å»áÊæ·þ

Èç¹û¼Ó¸ötimer£¬Ö»ÏÔÊ¾Ç°Ãæ4¸ö°¡£¬ºóÃæµÄÔõôÏÔʾ°¡

°Ñ100Ðзŵ½ss:Tstringlist
stringgrid1Ö»Éè4ÐÐ
¶¨Ê±Æ÷ʼþ£º
Delphi(Pascal) code:
inc(p);
for i:=0 to 3 do
stringgrid1.cells[0,i+1]:=ss[(p+i) % 100];


²»Ðа¡£¬ stringgrid1.cells[0,i+1]:=ss[(p+i) % 100];ÔÚ%ÕâÀï±§´í¡£
˵ÊÇ·Ç·¨×Ö·û

%ÊǸöɶ£¬ÄãÒª¸ÉÂï



ÒýÓÃ
ÒýÓà 5 Â¥ sunrainxue µÄ»Ø¸´:
²»Ðа¡£¬ stringgrid1.cells[0,i+1]:=ss[(p+i) % 100];ÔÚ%ÕâÀï±§´í¡£
˵ÊÇ·Ç·¨×Ö·û


Ŷ£¬Ó¦¸Ã¸ÄΪ mod ¡£%ÊÇcµÄÓï·¨ÁË¡£ºÇºÇ


¸Ðлsz_haitao µÄÖ¸µ¼£¬²»¹ýÄãµÄ˵·¨²»Æð×÷Óã¬Ö»ÄÜÏÔʾ1¡«4Ìõ¼Ç¼¡£
ÏÖÔÚÎÒ¸ÄÓÃmove£¬ÍêÃÀ½â¾öÎÊÌâÁË¡£
for i:=0 to adoquery1.recordcount-2 do
ss.move[i]:=ss.move[i+1];

pÒªÉè³ÉÈ«¾Ö±äÁ¿»òÕß´°ÌåµÄÊôÐÔ


Ïà¹ØÎÊ´ð£º

СµÜ²»»áDELPHI£¬Çë´óÏÀÃǰï¸öæ

Õâ¸öÊÇÀ¹½Ø°´¼üÏûÏ¢²¢²âÊÔÊÇ·ñΪENTER¼ü¡£
  begin
    case wParam of
      WM_KEYDOWN:
      fEatKeystroke := (p.vkCode = VK_RETURN);
  & ......

delphi Ctrl+×ó¼ü ÎÞ·¨²é¿´ windows.pas Ôõô°ì

ÎÒ°²×°µÄÊÇÆóÒµ°æ¡£¡£¡£ 
ÎÒÎÊÏ£¬ CTRL+×ó¼ü Äܲ鿴 windows.pas Âð£¿
¾ÍÊÇ ½Ó¿ÚÀïµÄwindows¡£

µ±È»¿ÉÒÔ,CTRL+×ó¼üµã»÷Interface²¿·ÖµÄWindows¾Í¿ÉÒÔÁË

ɶɶÆóÒµ°æ£¿È¥°²×°Ä¿Â¼¿´¿´libÎļþ¼ÐÏÂÓÐÃ»Ó ......

¹ØÓÚDelphiʹÓÃADOÁ¬½ÓSQL server 2000Êý¾Ý¿âµÄÎÊÌâ

СµÜÎÒÓÃADOÁ¬½ÓSQL server 2000Êý¾Ý¿â£¬È»ºóÔÚDBGridÖÐÏÔʾ£¬ÏÖÔÚÏë°ÑÔÚDBGridÖвéѯµ½µÄÊý¾ÝiPlot×÷ͼ£¬ÇëÎÊÈçºÎʵÏÖÔÚDBGridÖеÄÊý¾Ý¶ÁÈ¡£¬¶Á³öµÄÊý¾ÝÊÇSTRINGÀàÐ͵ģ¬ÈçºÎÓÐЧµÄת±ä³ÉÊý¾Ý¿âÖÐËù´æ´¢µÄDOUBLEÀàÐ ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ