mausimag Informática
Número de Mensagens : 24 Idade : 33 Data de inscrição : 21/12/2007
| Assunto: [DELPHI]Pedir senha antes do form principal Sex Dez 21, 2007 11:13 am | |
| Somente coloque esse código no evento OnCreate do form principal. Código: - Código:
-
procedure TForm1.FormCreate(Sender: TObject); var senha: string[6]; begin senha:=inputbox('Senha','Digite a Senha,''); if (senha<>'159')and(senha<>'159') then begin {no lugar de 159 digite sua senha} SHOWMESSAGE('SENHA INCORRETA!'); halt; end; end; | |
|
eXodo34 Member
Número de Mensagens : 44 Data de inscrição : 20/06/2011
| Assunto: Re: [DELPHI]Pedir senha antes do form principal Ter Jun 21, 2011 2:19 pm | |
| | |
|
maches Amigo da EOC
Número de Mensagens : 73 Data de inscrição : 23/06/2011
| Assunto: Re: [DELPHI]Pedir senha antes do form principal Dom Jun 26, 2011 5:13 pm | |
| | |
|
Conteúdo patrocinado
| Assunto: Re: [DELPHI]Pedir senha antes do form principal | |
| |
|