Como usar ADOQuery?

[CottonMouth]

hola a todos!! tengo el siguiente problemita. Mi idea es buscar un numero de socio y si se encuentra que me lo muestre en un label, que lo selecione en el
dbgrid y lo elimine o lo modifique segun boton. tengo el siguiente cosigo pero no hace nada, supuse que era la consulta pero la modifique varias veces y nada .Si me pueden ayudar se los agradeceria mucho.La BD es en access y uso un ADOTable

 
ADOQuery1:=TADOQuery.Create(self);
      ADOQuery1.Active:=false;
      ADOQuery1.Connection:=MiConec;
      ADOQuery1.SQL.Text:='SELECT IdSocio FROM Socios where IdSocio like :'+ %editBuscar.Text%;
      ADOQUERY1.Active:=True;
    if ADOQuery1.IsEmpty then
    messagedlg('El Nro de socio no existe', mtError, [mbok],0)
  else
    Label1.Caption := ADOQuery['IdSocios'];
      ADOQuery1.Close;

besos, luly