Modificar un LISTBOX desde otro Form

[Aurepilo]

Buenos días,

Estoy usando RAD STUDIO XE. Desde form1 el usuario pulsa un botón y aparece el form2. Poniendo cada unidad en Uses puedo intercambiar información entre los forms (Variables), tambien puedo usar procedimientos del form1 poniendo: tform1.procedimientoquesea; . Pero si intento modificar o actualizar objetos como un edit o un listbox desde el form2 al form1 no lo consigo. Lo que hago es, por ejemplo form1.edit1.text := 'lo que sea'; y no funciona. No me da error. Simplemente, no lo hace... ¿Es un bug o es que me pasa algo por alto?. Desde luego no soy programador, solo aficionado, así que disculpad las molestias.

[Casimiro Notevi]

Pon el código fuente, que lo veamos

[Aurepilo]

Bueno, el codigo es simple:

Uses

Unit2

...

Implementation

procedure TForm4.Button4Click(Sender: TObject);
 var
  form2: TForm2;
begin
  if MessageDlg('Esto creará un nuevo expediente. ¿Desea continuar?', mtConfirmation, [mbOk, mbCancel], 0) = mrCancel then close
  else
  begin
  creaexpediente;
  form2 := TForm2.Create(NIL);
  form2.ShowModal;

  end;
end;

El proceso creaexpediente simplente hace un INSERT en una base de datos access, pero no hace falta para resolver esto

En el Form2 he probado de todo.... para intentar modificar la listbox o los edit que existe en el Form1 y ninguna funciona. Por ejemplo:

procedure TForm2.Button1Click(Sender: TObject);
begin
Form1.Labelededit2.text := 'NO FUNCIONA';
FORM1.UpdateApplication;
MyGlobals.nomclient := ListBox1.Items.Strings[ListBox1.ItemIndex];
Form1.reactiva;

Form1.CheckListBox1.Refresh;
Form1.CheckListBox1.Items.Add('memo');
Form1.Repaint;
CLOSE;
end;

Me explico:

He intentado hacerlo por las bravas: Form1.Labelededit2.text := 'NO FUNCIONA'; resultado: NADA
A traves de un procedimiento llamado UPDATEAPLICATION, que actualiza todas las ventanas, por si hubiera algun tipo de "desfase"
A base de añadir una classe en otro formulario llamada MyGlobals que contiene las variables que quiero pasar (MyGlobals.nomclient := ListBox1.Items.Strings[ListBox1.ItemIndex]
a traves de un proceso en la FORM1 llamado "reactiva" que, básicamente, lo que hace es un form1.activate, esperando que ello lance el onactivate... pero eso tampoco funciona.
Y finalmente con repaint y refresh, a ver si la cosa cambia, pero no.

[Aurepilo]

Por cierto, ya he provado a quitar el modalshow y todas las formulas de create (nil, self, application)

[ecfisa]

He intentado hacerlo por las bravas: Form1.Labelededit2.text := 'NO FUNCIONA'; resultado: NADA

Hola Aurepilo.

Una consulta: En la unidad en que declaras a Form2, ¿ Esta incluída la unidad que contiene a Form1 ?

Saludos.

[Aurepilo]

Si está incluida en el uses. En cualquier caso si no lo estuviera supongo que me daria error... lo curioso es que no me da ningun tipo de error, simplemente, no lo hace. Otra cosa curiosa es que si invoco cualquier procedimiento correspondiente al form1 (por ejemplo form1.procedimientox, lo ejecuta y temas aritmeticos y showmessage los hace sin problema... pero a la hora de modificar un edit o un listbox, no. Por eso digo que no sé si me pasa por alto algun principio de Delphi que no acabo de entender.