Llamada a un evento !!!

[Ledian_Fdez]

Holas amigos de este foro, les traigo una interrogante. Les explico.

Supongamos que tengo 2 formulario donde en:

En el Form1

objetos: Combobox1, Edit1

Código Delphi [-]
procedure TForm1.ComboBox1Change(Sender: TObject);
begin  
   // lineas codigo1   
end;

Form2

Objetos : memo1, BitBtn1

Código Delphi [-]
procedure TForm2.BitBtn1Click(Sender: TObject);
begin  
  // lineas codigos2 
  // quiero llamar al procedure TForm1.ComboBox1Change 
end;

¿Alguién me pudiera decir como se hace?

De antemano muchas gracias.
Saludos Ledian

[dec]

Hola,

Puedes acceder al "Form2" y a sus componentes desde el "Form1", únicamente añadiendo en "Form1" la unidad que contenga a "Form2". Esto creo que ya lo sabes. En cuanto a disparar el evento "OnChange" del "ComboBox"... no me queda muy claro lo que quieres hacer. ¿Quieres cambiar el elemento que un momento dado esté seleccionado? ¿Quieres obtener el elemento seleccionado? ¿Quieres, sencillamente, ejecutar el código que se encuentre en dicho evento?

[Ledian_Fdez]

Exactamente lo que quiero primero es ejecutar unas lineas de codigos y luego ejecutar el código que se encuentre en el evento TForm1.Combobox1Change.

gracias.

[[seoane]]

Como te dijo dec tienes que añadir a las uses de Form2 la unit que contiene el Form1, despues solo tienes que llamar al evento:

Código Delphi [-]
procedure TForm2.BitBtn1Click(Sender: TObject);
begin  
  lineas codigos2 
  // Puedes llamarlo asi
  Form1.ComboBox1Change(nil);
  // o tambien asi
  Form1.ComboBox1Change(Sender); 
end;

[Ledian_Fdez]

Ok gracias amigo. ya resolvi el problema., eso si me funciono con el

Código Delphi [-]
Form1.ComboBox1Change(Sender);

el otro me dio error.

Saludos Ledian

[dec]

Hola,

el otro me dio error.

¿Puedes mostrar, si es posible, el código fuente del evento de marras?