arama yapamıyorum

[forumsad]

Kod: Tümünü seç

procedure TfrmAidat.Button1Click(Sender: TObject);
var
hno:string;
aramas:string;
begin
hno:='40289';
DMvt.ADOQuery1.Close;
DMvt.ADOquery1.SQL.Clear;
DMvt.ADOQuery1.SQL.Add('select HesapNo from tblUyeler where HesapNo="'+hno+'" ');
DMvt.ADOQuery1.Open;

aramas:=DMvt.ADOQuery1.FieldByName('TC').AsString;
DMvt.ADOQuery1.Close;
ShowMessage(aramas);
end;

arkadaşlar bu kod hata veriyor sorun ne acaba teşekkürler

[SimaWB]

Sorgu ifadesinde TC alanı yok ama siz ADOQuery1.FieldByName('TC') kullanmışsınız ?

[forumsad]

doğru gözden kaçırmışım

select * from yaptım düzeldi çok teşekkürler

saygılar sunarum