![]() |
![]() |
![]() |
![]() |
![]() |
FTP | ![]() |
![]() |
CCD | ![]() |
![]() |
Buscar | ![]() |
![]() |
Trucos | ![]() |
![]() |
Trabajo | ![]() |
![]() |
Foros | ![]() |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
![]() |
|
Herramientas | Buscar en Tema | Desplegado |
|
#1
|
|||
|
|||
Hola, bueno soy nuevo en delphi y me ha gustado esta web, tenia una duda aver si me ayudan que no he entendido muy bien:
Código:
unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, Buttons; type TForm1 = class(TForm) Edit1: TEdit; Label1: TLabel; Label2: TLabel; SpeedButton1: TSpeedButton; procedure SpeedButton1Click(Sender: TObject); private { Private declarations } public { Public declarations } end; var Form1: TForm1; nombre: Integer; implementation uses Unit2; {$R *.dfm} procedure TForm1.SpeedButton1Click(Sender: TObject); begin nombre:= 123456; if edit1.Text = inttostr(nombre) then Label1.Caption:= 'Contraseña correcta' Application.CreateForm(TForm2,Form2) Form2.Show else Label1.Caption:='contraseña incorrecta'; end; end. |
#2
|
||||
|
||||
sólo te falta un begin... end porque dicho if tiene más de una instrucción dentro:
COmo hago para llamar un segundo formulario desde el formulario principal?[/quote]
__________________
Si usted entendió mi comentario, contácteme y gustosamente, se lo volveré a explicar hasta que no lo entienda, Gracias. |
![]() |
|
|
![]() |
||||
Tema | Autor | Foro | Respuestas | Último mensaje |
llamar al evento click de un boton q se encuentra en un form desde otro form | TURBOIGOR | OOP | 6 | 02-12-2008 14:50:16 |
como puedo asociar un form a otro form? | jasz | OOP | 1 | 28-11-2007 00:12:09 |
pasar datos de un form a otro form | vroa74 | API de Windows | 15 | 12-10-2007 19:11:52 |
Imposible hacer visible un form desde otro form | SMTZ | .NET | 13 | 16-01-2006 21:41:08 |
obtener valor de otro form | maruenda | Varios | 10 | 02-12-2004 21:06:01 |
![]() |
|