Usamos cookies para medir audiência e melhorar sua experiência. Você pode aceitar ou recusar a qualquer momento. Veja sobre o iMasters.
Estou usando o componente Delphi-7/Zeus conectando ao MySQL.
Eu queria que quando eu clico em conectar no meu programa, ele verifica a conexao e, se tiver tudo certo ele conecta.
Eu fiz esse codigo, só que não da certo:
if dm.DBConexao.Connected=false then
try
DM.DBConexao.HostName:= 'xxx.xxx.xxx.xxx';
DM.DBConexao.Port:= 3306;
DM.DBConexao.Connected:=true; ShowMessage('Não foi possivel estabelecer uma conexao com o servidor, verifique seu firewall.');
end;Carregando comentários...