[Kailon]

Компилятор сообщает Вам, что не хватает кавычек. Проще номер телефона передать параметром.

Код:

DataModule1.ADOQuery1.SQL.Text ('SELECT Id FROM uchastniki  WHERE NomTel = :TelNom');
DataModule1.ADOQuery1.Parameters[0] := TelNom;