В общем проблема такая,мне надо написать регистрацию через клиент сервер ..в общем человек коннектиться заполняет едиты отправляет все на сервер там все добавляется в бд ,это все сделано ..у меня есть ячейка показывающая айпишник пользователя ...
я хочу сделать так что б если айпи такой уже зареган ,то выводилось сообщение на сервере уже зареган такой пользователь с таким айпи адрессом проходит поиск

ADOQuery1.SQL.Add('select* from ПОльзователи where IP='+QuotedStr(edit4.text));
потом проверка
if ADOQuery1.Eof then
но в любом случае если я регистрируюсь ,то пишет что такой есть пользователь
вот код серверсокета на событие чтения от пользоователя
procedure TForm1.ServerSocketClientRead(Sender: TObject;
 Socket: TCustomWinSocket);
var I: integer;
s:string;

begin
for I:=0 to ComponentCount-1 do
 begin
  if Components[i] is TEdit then
   begin
    if TMEdit(Components[i]).Text='' then
     TMEdit(Components[i]).Text:=Socket.ReceiveText;
   end;
 end;

 if (edit1.text<>'') and (edit2.text<>'') and (edit3.text<>'') and (edit4.text<>'') then

begin
 form1.ADOQuery1.Insert;
 form1.ADOQuery1Name.AsString:=Edit1.Text;
 form1.ADOQuery1Fam.AsString:=Edit2.Text;
 form1.ADOQuery1Email.AsString:=Edit3.Text;
 form1.ADOQuery1IP.AsString:=Edit4.Text;
 form1.ADOQuery1.Post;
 button3.Click;
end;
ADOQuery1.SQL.Add('select* from ПОльзователи where IP='+QuotedStr(edit4.text));
if ADOQuery1.Eof then
showmessage ('Уже есть');
end;
обьясните может я не в очередь вставил проверку на такого пользователя?
если можете напишите этот код правельно потому что я новичек в делфи

> вот код серверсокета


Он какое отношение имеет к теметике конференции "Базы" ?
Абсолютно никакого.

эм..я имел ввиду код на событие когда что то приходит на сервер..а помощь мне нужна с бд...если бы я этого не написал тебе было бы легче?ЛУчши помоги с проблемой

> код на событие когда что то приходит на сервер


А какая разница, когда выполняется этот код ?
Никакой.
Так зачем же ты приплел сюда все касаемое сети, тем более что работать оно в условиях глоб.сети зведомо не будет ?

Отделяй мух от котлет.

> помощь мне нужна с бд


Где у тебя в коде оператор, запускающий select-запрос на выполнение ?

ADOQuery1.SQL.Add('select* from ПОльзователи where IP='+QuotedStr(edit4.text));

А почему проверка идет после создания записи?