Oficina
Port Scanner
|
Qua 5 Abr 2006 19:22 |
- Detalhes
- Categoria: Ferramentas de Rede
- Atualização: Domingo, 14 Junho 2009 17:12
- Autor: T.J.Nogueira
- Acessos: 21981
Criando a Interface do Port Scanner
Inicie o Delphi e crie um novo projeto chamado psc.dpr (a unit você poderá salvar como unit_psc.pas). No formulário inicial que abrir, mude as seguintes propriedades do Form1 no ObjectInspector como seguem abaixo:
- Caption = Port Scaner v1.0b
- BorderStyle = bsToolWindow
- WindowState = Normal
Após estas modificações o antigo Form1 ficará desta forma:
Agora, neste nosso formulário, adicionaremos os seguintes componentes que serão os responsáveis pela interação do Port Scanner com o usuário.
| Quantidade | Tipo |
| 5 | TLabel |
| 1 | TEdit |
| 2 | TSpinEdit |
| 1 | TMemo |
| 1 | TTCPClient |
| 2 | TButton |
Após a adição destes componentes, altere as propriedades dos mesmos para as que seguem abaixo:
| Componente | Propriedade | Conteúdo |
| Tlabel1 | Caption | Servidor |
| Tlabel2 | Caption | Porta Inicial |
| Tlabel3 | Caption | Porta Final |
| Tlabel4 | Caption | Verificando a porta: |
| Tlabel5 | Caption | 0 |
| TspinEdit1 | Name | Inicio |
| TspinEdit2 | Name | Fim |
| Tmemo1 | Name | Listagem |
| Tbutton1 | Caption | Iniciar |
| Tbutton2 | Caption | Parar |
| Tedit1 | Text | endereco |
Com estas modificações, arrume os componentes no formulário para que fiquem mais ou menos com esta Interface:
Neste ponto, falta muito pouco para o nosso Port Scanner ficar pronto. Temos agora que programar o funcionamento do nosso programa para que ele seja funcional e corresponda às nossas expectativas.