ayuda con consulta con ado y SQL

[olbeup]

Tienes Vinculados todos los componentes:
ADOConnection -> ConnectionString
ADOQuery -> ADOConnection
DataSource -> ADOQuery
DBGrid -> DataSource

Para que se vea mas claro una sentencia SQL, aunque tienes que poner mas líneas es más legible de ver.
Ejemplo.

Código Delphi [-]
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
  if (Key = VK_RETURN) then
  begin
    if AdoConnection1.Connected then
      AdoConnection1.Close;

    with ADOQuery do
    begin
      SQL.Clear;

      SQL.Add('SELECT');
      SQL.Add('    *');
      SQL.Add('  FROM Pacientes');
      SQL.Add('  WHERE ID_PACIENTES = ' + Edit1.Text);

      Open;
    end;
  end;
end;

Un saludo.