![]() |
![]() |
![]() |
![]() |
![]() |
FTP | ![]() |
![]() |
CCD | ![]() |
![]() |
Buscar | ![]() |
![]() |
Trucos | ![]() |
![]() |
Trabajo | ![]() |
![]() |
Foros | ![]() |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
||||
|
||||
![]() Tengo el siguiente codigo...
//formulario 1 //ESTE FORMULARIO TIENE UN TEXTBOX ...... procedure form1.Button1Click(sender:tobject); var formu2:Tform2; begin formu2:=tform2.create(self); formu2.showmodal; formu2.free; end; .... //en el formu2 ... procedure formu2.button1Click(sender:tobject); var i:integer; begin i:=100; form1.textbox1.text:=intToStr(i); //AQUI ME DA EL ERROR close; end; ..... La verdad es que no se porque aparece el error cuando quiero pasar el valor de la variable a la caja de texto que esta en el form1. Agradeceria que me dieran una respuesta de que es lo que estoy haciendo mal y como solucionarlo. Gracias.
__________________
Uno es responsable de lo que hace y de lo que omite hacer. |
|
|
![]() |
|