delphiÖÐselectÓï¾ä±äÁ¿²éѯ
SQL.Add('SELECT formula,val(DMAF) as i from Åä·½Õï¶Ï±í where 1=1 and formula ='''+Combobox3.Text+''' and formula ='''+Combobox4.Text+''''); Õâ¸öÓï¾äÖС£ÎÒÏë°Ñval£¨DMAF£©×÷Ϊһ¸ö±äÁ¿¡£²éѯ¸÷¸ö×ֶεÄÖµ¡£ÇëÎÊÈçºÎ¸øËùÒª²éѯµÄ±äÁ¿×ֶθ³ÖµÄØ¡£ ¾ÍÊÇ˵±íÖÐÓкöà×ֶΡ£ÈçºÎ²éѯ¸÷¸ö×ֶεÄÖµ¡£ºóÃæwhereÌõ¼þ²»±ä¡£ÈçºÎʵÏÖ
sqlstr:='insert into Machine (MACHINEID,USERID) values (:Pmach,:puser)'; params[0].value:=machedit.Value ; params[1].Value :=edituser.Value ; ¿ÉÒÔʹÓÃParamsÕâ¸ö²ÎÊý ²éѯÓï¾äÔõÃ´Ð´ÄØ£¿ ÒýÓà sqlstr:='insert into Machine (MACHINEID,USERID) values (:Pmach,:puser)'; params[0].value:=machedit.Value ; params[1].Value :=edituser.Value ; ¿ÉÒÔʹÓÃParamsÕâ¸ö²ÎÊý Delphi(Pascal) code: with ADOQuery1 do begin Active := false; SQL.Clear; SQL.Add('SELECT * from Åä·½Õï¶Ï±í where ......'); Active:=true; First; while not EOF do begin for i:=0 to Fields.Count-1 do begin //ͨ¹ýÑ»·È¡¸÷×ֶεÄÖµ //Show Fields[i].value end; Next; end; ¾ßÌåµ½ÎÒÉÏÃæµÄÓï¾ä¡£ÎÒ¸ÄÔõÃ´Ð´ÄØ£¿ÄܸøÎÒ¾Ù¸öСÀý×ÓÂð£¿Ð»Ð»ÁË¡£ÎÒÏë²éѯÁ½¸ö×ֶεÄÖµ¡£È»ºó°ÑÕâÁ½¸öÖµ¸³µ½dbchartÖеÄÖùÐÎͼÖС£ÎÒÈçºÎʵÏÖÄØ£¿ ллÁË¡
Ïà¹ØÎÊ´ð£º
ллÁË¡£×îºÃÓдúÂë Insert into Table2(field1,field2,...) select value1,value2,... from Table1 insert into ±íÒ» select * from ±í¶þ Èç¹û×ֶβ»Ò»Ö£¬ÒªÖ¸¶¨×Ö¶Î insert into ±íÒ»(A,B) se ......
ÔÎĵØÖ·£ºhttp://hi.baidu.com/sqldebug/blog/item/58a764624a44d74eeaf8f863.html Ò»¡¢ÈçºÎÏÞÖÆÏµÍ³·þÎñºÍ×ÀÃæ³ÌÐòÖ»ÔËÐÐÒ»¸ö ÈçºÎÏÞÖÆÏµÍ³·þÎñºÍ×ÀÃæ³ÌÐòÖ»ÔËÐÐÒ»¸ö ÔÚ¹¤³Ì¼ÓÈëÏÂÁдúÂë¿ÉÒÔ ......
[size=18px]var s,n:integer; begin write('ÊäÈë±ä³¤µÄÌõÊýn'); readln(n); [color=#FF0000]s:=n*(n-1)*(n-2)div 6; //±¾ÐÐÌæ»»Îªs:=n*(n-1)*(n-2)/ ......
ÇëÎÊdbook V1.10°æ±¾µÄÔ´´úÂ루delphi£©ÊDz»ÊÇÔËÐв»Á˰¡£¬ÔÚÍøÉÏÏÂÁ˺ö࣬´ò¿ªÖ÷´°ÌåµÄʱºò×ÜÊDZ¨´í,֮ǰ×Ôѧc#£¬²Å¸Õ¿ªÊ¼£¬ÏÖÔÚÀÏʦ²¼ÖÃÈÎÎñÈÃÎÒ¸Ädbook V1.10°æ±¾µÄÔ´´úÂ룬ץ¿ñÁË£¬Ò»µãÍ·Ð÷ҲûÓУ¿¸÷λ´óÏÀ¸øµ ......
±ÈÈçÔÚdelphi´úÂëÀ¶Ôij¸ö·½·¨»òÕßform²»Á˽⣬°´ÏÂctrl¼ü£¬ÓÃÊó±êµãһϣ¬¾Í»áÌøµ½Õâ¸öform»ò·½·¨µÄ´úÂëÄÄÀïÈ¥¡£ ÎÒ¸Õѧc#£¬ÏÈÏÂÁËÒ»¸öϵͳµÄÔ´´úÂë¿´£¬ÀïÃæºÜ¶à¿Ø¼þ¡¢·½·¨²»ÖªµÀÊÇÄÄÀïÀ´µÄ£¬Ò²Ã»·¨È¥ÕÒ¡£ ......