Uso de la función FindComponent

[memoferprof]

Empezado por ecfisa

Hola memoferprof.

Por supuesto que si. Claro que debes especificar el form.

Un ejemplo bien simple:
Código Delphi [-]... uses Unit2; procedure TForm1.Button1Click(Sender: TObject); begin ... Caption:= TEdit(Form2.FindComponent('Edit1')).Text end; ...


Saludos.

Wow!!
Gracias eficsa
Sin probarlo, estoy seguro que esa es mi solucion al problema que tengo, no lo habia pensado de esa manera jeje o tal vez no alcanzaba mi mente a entenderlo asi o simplemente no sabia que se podia asi. Pero gracias, gracias.

[ecfisa]

Hola memoferprof.

Como dato adicional, en el código anterior (msg #5) donde están los "...", es conveniente que verifiques que el componente contenedor (form) haya sido creado para evitar una excepción:

Código Delphi [-]
  ...
  if Assigned(Form2) then  // verificar
    Caption:= TEdit(Form2.FindComponent('Edit1')).Text;
  ...

Saludos.

[memoferprof]

Empezado por ecfisa

Hola memoferprof.

Como dato adicional, en el código anterior (msg #5) donde están los "...", es conveniente que verifiques que el componente contenedor (form) haya sido creado para evitar una excepción:
Código Delphi [-] ... if Assigned(Form2) then // verificar Caption:= TEdit(Form2.FindComponent('Edit1')).Text; ...


Saludos.

Lo hare de esa manera, solo quiero agregar mi comentario para explicar mi entendimiento:
estaba haciendo mal uso de la funcion FindComponent, lo que yo hacia era decirle a la funcion FindComponent que fuera a

Código Delphi [-]
with TUniPanel(FindComponent('Main.MainForm.PDomi1')) do

y por lo que me has enseñado, lo que debo hacer es ir a la MainForm y decirle que use la funcion FindComponent para que ahi ya busque el componente que deseo, osea que algo asi:

Código Delphi [-]
with TUniPanel(Main.MainForm.FindComponent('PDomi1')) do

Gracias nuevamente.