ADOQuery1.SQL.Text := 'select Nomer from tabli where nomer=:nomer '; ADOQuery1.Parameters.ParamValues['nomer'] := nomer; ADOQuery1.Open;