Problema al asignar valor antes de visualizar el form

[JoAnCa]

Y serviria usando el Sender del objeto que abre el formulario?

[Neftali [Germán.Estévez]]

Empezado por Jose Caceres

Y serviria usando el Sender del objeto que abre el formulario?

Supongo que te refieres al parámetro que llega an OnShow, pero en este caso ese parámetro es el propio formulario, así que creo que no serviría.

[JoAnCa]

Bueno, tal vez no entendi bien la pregunta con lo del llamado de diferentes sitios.
Me imagino que es que lo abres con una opcion de menu o con un boton de una ToolBar
Si es asi, funciona usando el sender

Código Delphi [-]
  Application.CreateForm(TForm2, Form2);
  if Sender = Abrir1 then
    Form2.Label1.Caption:='Me abrieron con el Menu';
  if Sender = ToolButton1 then
    Form2.Label1.Caption:='Me abrieron con un Boton';
  Form2.Show;

En este caso lo hago cambiando el caption de un label, pero puede servir tambien para modificar cualquier objeto del formulario antes que se abra

Si los sitios desde donde mandas a abrir el formulario no son esos, entonces detallame mejor desde donde lo haces.
O donde esta la imagen que quieres cambiar? en form1 o en fSalidas

[*Caro*]

Empezado por Jose Caceres

Bueno, tal vez no entendi bien la pregunta con lo del llamado de diferentes sitios.
Me imagino que es que lo abres con una opcion de menu o con un boton de una ToolBar
Si es asi, funciona usando el sender


Código Delphi [-] Application.CreateForm(TForm2, Form2);
if Sender = Abrir1 then
Form2.Label1.Caption:='Me abrieron con el Menu';
if Sender = ToolButton1 then
Form2.Label1.Caption:='Me abrieron con un Boton';
Form2.Show;



O donde esta la imagen que quieres cambiar? en form1 o en fSalidas

Hola jose, drykea necesita el formulario desde donde a sido llamado fSalidas, ese formulario lo muestra desde diferentes formularios y el quiere saber desde donde ha sido llamado, por eso estaba asignando un valor al Tag de FSalidas según al formulario donde se hace el Show le da un valor, pero no le funcionaba por lo que ya ha comentado Neftali. Se ha dado dos soluciones con el Owner y con el AfterShow.

Sobre tu pregunta, la imagen que quiere cambiar esta en FSalidas que cambia según al formulario que lo llama.

Saluditos

[Neftali [Germán.Estévez]]

Empezado por Jose Caceres

En este caso lo hago cambiando el caption de un label, pero puede servir tambien para modificar cualquier objeto del formulario antes que se abra

El problema es que es ecódigo funciona como se espera con formularios normales. Si en el OnShow del formulario 2 colocas el código:

Código Delphi [-]
MessageDlg('Caption: ' + Form2.Label1.Caption, mtInformation, [mbOK], 0);

Verás que para cada opción aparece un caption diferente. Pero no así si son formularios MDI, ya que el OnShow se ejecuta directamente desde el create antes de poder hacer las asignaciones. Más bien el problema no es asignar los valores, sino en qué eventos "rescatarlos".

[JoAnCa]

Ok, ahora si ya entiendo lo que quiere hacer el amigo drykea
Tengo que pensar un poco mas, en concreto es buscar en que evento poner el codigo para que funcione bien

[Neftali [Germán.Estévez]]

Empezado por Jose Caceres

...en concreto es buscar en que evento poner el codigo para que funcione bien

Y para eso va perfecto el AfterShow, que comentábamos...

[drykea]

Muchisimas gracias a todos por vuestras respuestas.

Se que he tardado un poco en volver a escribir, pero estaba haciendo pruebas y ademas me he cogido unas minivacaciones

Bueno a lo que iba.
He estado probando y he conseguido que me funcione utilizando el Aftershow.

Con lo del owner, no he sido capaz de quitar el error que me daba al crear el documento

Pero bueno, he conseguido lo que queria, muchisimas gracias otra vez...