Cita:
Empezado por Carmelo Cash
Edit2.text:= TQuery(FindComponent('ABM_Rubros.Form_ABM_Rubros.Query11')).fields[1].value;
|
Seguramente no va a encontrar ningún componente que se llame "ABM_Rubros.Form_ABM_Rubros.Query11", ya que el nombre del supuesto componente solamente es "Query11".
Tendrías que tener algunas consideraciones, como verificar si FindComponent retornó algo como lo que estas esperando:
Código Delphi
[-]
var
AComponent: TComponent;
begin
AComponent := FindComponent('Query11');
if AComponent is TQuery then
Edit1.Text := TQuery(AComponent).Fields[1].Value
end;
Vale aclarar que si estas ejecutando FindComponent en un evento o dentro del código de un TComponent (Posiblemente de un TForm), FindComponent lo ejecutará Self y me parece que vos queres buscarlo en Form_ABM_Rubros, por lo que tendrás que hacer algo como:
Código Delphi
[-]
...
AComponent := Form_ABM_Rubros.FindComponent('Query11');
Saludos!