Classe TdtmKernelConexao

Properties

Unit

untKernelConexao

Declaração

type TdtmKernelConexao = class(TDataModule)

Descrição

Modulo de dados de Conexao

Hierarquia

TDataModule
TdtmKernelConexao

Visão Geral

Campos

	`conConexao: TZConnection;`
	`strServidorPrincipal: string;`
	`strPortaPrincipal: string;`
	`strBancoPrincipal: string;`
	`strUsuarioPrincipal: string;`
	`strSenhaPrincipal: string;`
	`strServidorAlternativo: string;`
	`strPortaAlternativo: string;`
	`strBancoAlternativo: string;`
	`strUsuarioAlternativo: string;`
	`strSenhaAlternativo: string;`

Métodos

	`procedure DataModuleCreate(Sender: TObject);`
	`procedure AplicativoOnMessage(var Msg: tagMSG; var Handled: Boolean);`
	`procedure AposCriarInterno;`
	`procedure Conectar;`
	`procedure CarregarConfiguracao;`
	`function LancarConfiguracao : boolean;`
	`procedure AposCriar; virtual;`
	`function Ambiente : TAmbiente;`

Descrição

Campos

	`conConexao: TZConnection;`
Objeto de Conexão com banco de dados

	`strServidorPrincipal: string;`
Servidores portas senhas, etc

	`strPortaPrincipal: string;`
Servidores portas senhas, etc

	`strBancoPrincipal: string;`
Servidores portas senhas, etc

	`strUsuarioPrincipal: string;`
Servidores portas senhas, etc

	`strSenhaPrincipal: string;`
Servidores portas senhas, etc

	`strServidorAlternativo: string;`
Servidores portas senhas, etc

	`strPortaAlternativo: string;`
Servidores portas senhas, etc

	`strBancoAlternativo: string;`
Servidores portas senhas, etc

	`strUsuarioAlternativo: string;`
Servidores portas senhas, etc

	`strSenhaAlternativo: string;`
Servidores portas senhas, etc

Métodos

	`procedure DataModuleCreate(Sender: TObject);`
Evento Ao Criar o Modulo de Dados

	`procedure AplicativoOnMessage(var Msg: tagMSG; var Handled: Boolean);`
Captura mensagens do aplicativo

	`procedure AposCriarInterno;`
Método disparado após criar o módulo de conexão internamente (depois de AposCriar);

	`procedure Conectar;`
Efetua a Conexão com o banco de dados

	`procedure CarregarConfiguracao;`
Método que carrega as informações do arquivo XML

	`function LancarConfiguracao : boolean;`
Lança o formulário de configuração

	`procedure AposCriar; virtual;`
Método disparado após criar o módulo de conexão

	`function Ambiente : TAmbiente;`
Evento Ao Criar o Modulo de Dados

Última modificação

Data: 22 de Dezembro de 2004