Valor de los campos en ejecución

[waltergomez]

Consulta:='Select Rpm, Marcha From TbDatos';
//...
Adoquery1.Sql.Add(Consulta);
Adoquery1.ExecSql; // no no no
para comandos select usa Open o Active

Adoquery1.Open; o Adoquery1.Active := true;

luego para acceder a los valores de RPM y Marcha usa FieldByName()

with Adoquery1 do
begin
Close;
Adoquery1.Sql.Clear;
Adoquery1.Sql.Add(Consulta);
Adoquery1.Open;
while not Eof do
begin
ShowMessage(FieldByName('RMP').AsString);
ShowMessage(FieldByName('Marcha').AsString);
Next;
end;
end;

Saludos,