Delphi - Enviar Valor a Otro Formulario

 
Vista:

Enviar Valor a Otro Formulario

Publicado por Pepe (15 intervenciones) el 28/02/2006 16:00:47
Estoy haciendo una aplicacion en delphi 6, y el problema que tengo es como se hace para enviar valores de un formulario a otro, puesto que ocupo esos valores para trabajar con ellos en otro formulario.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Enviar Valor a Otro Formulario

Publicado por Veronica (3 intervenciones) el 28/02/2006 16:54:20
Puedes definir variables globales a tu proyecto y asignar los valores de tu formulario a ellas y así cuando cambies de formulario no pierdes el valor de dichas variables. O bien puedes dejar activo tu formulario del cual obtienes los valores y hacer mencion a el desde tu nuevo formulario, esto seria algo así:

Text1.text := frmFormularioAnterior.text1.text

el formulario anterior sería de donde tomas los valores.

Espero te sirva.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Enviar Valor a Otro Formulario

Publicado por Jose (1 intervención) el 06/03/2006 19:07:50
para enviar parametroa a otro formulario hay muchas maneras la mas
usada es

si estas en form1 y quieres declarar algo que esta en form2 ejemplo
en un campo de texto escribes

form2.edit1.text:=' hola';

tambien declarando un arreglo, o una funcion

function TForm1.enviardatos(texto:string):string;
begin
form2.edit1.text:=texto
end;

la manera de uso es

enviardatos('hola');

automaticamente se envia al formulario 2
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Enviar Valor a Otro Formulario

Publicado por Virum (484 intervenciones) el 28/02/2006 16:56:41
Hola:

Declara en la unit principal una variable pública y la podrás utilizar en cualquier unit de tu aplicación.

Ej.
Unit principal llamada UMenu

....
...
private
{ Private declarations }
public
{ Public declarations }
end;

var
FMenu: TFMenu;
spMensage: string;

implementation
.....
.....

En la Unit de tu aplicación que quieras utilizar la variable spMensage debes añadir en su uses UMenu

.....
....
implementation

uses UMenu, UListado, ....;

{$R *.dfm}
.....
....
ShowMessage(UMenu.spMensage);
UMenu.spMensage := 'Segunda parada'
.....
......

Suerte.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar