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.