Llamar a un Form y que devuelva valores

[i.larranaga]

Hola a todos,

necesito crear un "InputBox" pero con varios valores y un Popup, y necesito recoger los valores que me de, pero no se ni como pasarlos ni como recogerlos.
¿Alguien me puede ayudar?

Un saludo.

[roman]

Básicamente lo que necesitas es definir propiedades públicas en el formulario y pasar y recibir los valores a través de ellas.

// Saludos

[jachguate]

También podes crear un método que se encargue de mostrar el formulario y devolver los valores de los edits, y en general de los diferentes controles.

Quedaria algo como:

Código Delphi [-]
Function TForm1.Execute(var varlor1, valor2 : String) : Boolean;

Begin
  Result := (ShowModal = mrOk);
  if result = mrOk Then
  Begin
    valor1 := edit1.text;
    valor2 := edit2.text;
  end;
end;

Donde la función devuelve TRUE si el usuario ha aceptado el formulario. En cualquier otro caso, los valores de las variables serán indeterminados (o mejor dicho, no modificados por la función).

Por cierto... que entendes por un popup?....


Hasta luego.