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ÖеÄÖùÐÎͼÖС£ÎÒÈçºÎʵÏÖÄØ£¿
ллÁË¡