مقداردهی متغیرها با استفاده از Adoquery

[sajjad6167]

سلام
فرض کنیم در یک جدول دوفیلد FName و LName داریم و یک فیلد PersonalCode که کلید اصلیه
من می خوام با استفاده از AdoQuery و یک Edit مقدار PersonalCode رو بگیرم و با استفاده از دستورات جستجو فیلدهای FName و LName که متناظر اون هستند رو داخل دو تا متغیر بریزم
لطفا اگه کسی میدونه راهنماییم کنه
ممنون

[ehstrn2010]

من معمولا این کارو می کنم

ADOQuery1.close;
ADOQuery1.sql.clear;
ADOQuery1.sql.text:='select Fname, Lname From Mytable where PersonalCode = : parameter0 ;';
ADOQuery1.Parameters.ParamByName('parameter0').Val ue :=edit1.text;
ADOQuery1.open;
if not(ADOQuery1.IsEmpty) then
begin
LastNameString:=ADOQuery1.FieldByName('Lname').AsS tring;
FirstNameString:=ADOQuery1.FieldByName('Fname').As String;
end;
adoqury1.close;