qx:=Query1.ParamByname('LODATE').AsString;//应该这样吧 ---------------------- 应该不是这个样子的吧,都编译不行用一样的话出现这个错误ADOQuery1:Flied 'MediaCode' not found,这是怎么回事,不说要字段名写错了,我看了N遍也看的是一样的
var i:integer; mc:string; begin for i:=0 to ListBox1.Count-1 do begin if ListBox1.Selected[i] then begin ADOQuery1.Close; ADOQuery1.SQL.Clear; ADOQuery1.SQL.Add('select MediaCode from Media where ChiMediaName=:s'); ADOQuery1.Parameters.ParamByName('s').Value:=ListBox1.Items.Strings[i]; ADOQuery1.Open; end; mc:=ADOQuery1.FieldByName('MediaCode').AsString; end;这是主要的代码,表Media中有一个字段MediaCode
----------------------
应该不是这个样子的吧,都编译不行用一样的话出现这个错误ADOQuery1:Flied 'MediaCode' not found,这是怎么回事,不说要字段名写错了,我看了N遍也看的是一样的
i:integer;
mc:string;
begin
for i:=0 to ListBox1.Count-1 do
begin
if ListBox1.Selected[i] then
begin
ADOQuery1.Close;
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add('select MediaCode from Media where ChiMediaName=:s');
ADOQuery1.Parameters.ParamByName('s').Value:=ListBox1.Items.Strings[i];
ADOQuery1.Open;
end;
mc:=ADOQuery1.FieldByName('MediaCode').AsString;
end;这是主要的代码,表Media中有一个字段MediaCode
mc:=ADOQuery1.Fields[0].AsString;