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ÒªÉè³ÉÈ«¾Ö±äÁ¿»òÕß´°ÌåµÄÊôÐÔ
Ïà¹ØÎÊ´ð£º
Õâ¸öÊÇÀ¹½Ø°´¼üÏûÏ¢²¢²âÊÔÊÇ·ñΪENTER¼ü¡£ begin case wParam of WM_KEYDOWN: fEatKeystroke := (p.vkCode = VK_RETURN); & ......
ÎÒ°²×°µÄÊÇÆóÒµ°æ¡£¡£¡£ ÎÒÎÊÏ£¬ CTRL+×ó¼ü Äܲ鿴 windows.pas Â𣿠¾ÍÊÇ ½Ó¿ÚÀïµÄwindows¡£ µ±È»¿ÉÒÔ,CTRL+×ó¼üµã»÷Interface²¿·ÖµÄWindows¾Í¿ÉÒÔÁË É¶É¶ÆóÒµ°æ£¿È¥°²×°Ä¿Â¼¿´¿´libÎļþ¼ÐÏÂÓÐÃ»Ó ......
СµÜÎÒÓÃADOÁ¬½ÓSQL server 2000Êý¾Ý¿â£¬È»ºóÔÚDBGridÖÐÏÔʾ£¬ÏÖÔÚÏë°ÑÔÚDBGridÖвéѯµ½µÄÊý¾ÝiPlot×÷ͼ£¬ÇëÎÊÈçºÎʵÏÖÔÚDBGridÖеÄÊý¾Ý¶ÁÈ¡£¬¶Á³öµÄÊý¾ÝÊÇSTRINGÀàÐ͵ģ¬ÈçºÎÓÐЧµÄת±ä³ÉÊý¾Ý¿âÖÐËù´æ´¢µÄDOUBLEÀàÐ ......