Ver Mensaje Individual
  #6  
Antiguo 23-04-2010
Avatar de olbeup
olbeup olbeup is offline
Miembro
 
Registrado: jul 2005
Ubicación: Santiago de la Ribera (España)
Posts: 685
Reputación: 19
olbeup Va camino a la fama
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.
Responder Con Cita