|
Buenos dias,
Neftali es que ya tengo la tabla creada con los campos correspondientes, y hay un campo llamado NombreObjeto que contiene el nombre del action list que quiero ejecutar, pero es que ahi es que esta el problema porque cuando paso el contenido del campo para que sea ejectuado no funciona mira esto es lo que hago que no funciona
procedure TFMenuUsuarios.cxButton5Click(Sender: TObject);
var comp : Taction;
begin
comp := FindComponent (FUsuarios.QMenuNombreObjeto.Value) as TAction;
TAction(comp).Execute;
end;
Pero si hago esto mismo pero sustituyo el lugar donde esta el campo de la tabla por el nombre que esta contenido en el campo si me funciona que seria esto
procedure TFMenuUsuarios.cxButton5Click(Sender: TObject);
var comp : Taction;
begin
comp := FindComponent (MnCuentas) as TAction;
TAction(MnCuentas).Execute;
end;
Actualmente estoy atorado ahi, no se como resolverlo. Gracias por su colaboracion.
|