ayuda con consulta con ado y SQL

[frholguin]

tengo esta consulta en un Edit , pero el DBGrid no se mueve para ningun lado necesito ayuda.

if key = #13 then
begin

if rbnopacientes.Checked = true then
qrverificacion.Close;
qrverificacion.Sql.Clear;
Qrverificacion.Sql.text:='SELECT * FROM pacientes WHERE ID_PACIENTES = '+(edit1.Text);
Qrverificacion.Open

[[Caral]]

Hola
No veo nada extraño, salvo los parentesis pero pregunto:
Dices que tienes la consulta en un Edit, no sera en el mismo edit1?.
Si no es asi, trata esto:

Código Delphi [-]
if key = #13 then
begin

if rbnopacientes.Checked = true then
qrverificacion.Close;
qrverificacion.Sql.Clear;
Qrverificacion.Sql.text:='SELECT * FROM pacientes WHERE ID_PACIENTES = '+edit1.Text;
Qrverificacion.Open

Y verifica que el dato del edit1 sea string, como tambien que el check este bien.
Saludos

[frholguin]

abria otra forma de hacerlo porque realmente no me esta funcionando, estoy tratando de hacer la consulta que pase al registro y cuando le doy no hace nada

[[Caral]]

Hola
Pregunto:
1- Que base de datos usas
2- como conectas el dbgrid con la tabla.
Saludos

[frholguin]

estoy usando SQL Server Express

[[Caral]]

Hola
Te voy a hacer un ejemplo con access de lo que creo que es lo que pretendes hacer, dame un minuto.
Saludos

[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.