SOCORRO !!!! COMO SABER SE O SERVIDOR MYSQL ESTÁ ATIVO !???

Caro amigo,
Acho que a forma mais simples de se fazer seria vc configurar um componente ZMySqlDatabase1 para acessar a base de dados que vc quer e tentar ativá-lo em tempo de execução em algum evento. Ficaria mais ou menos assim:

procedure TForm1.FormCreate(Sender: TObject);
begin
ZMySqlDatabase1.Database := ´Nome_da_sua_base_de_dados´;
ZMySqlDatabase1.Host := ´Nome_do_seu_host´;
ZMySqlDatabase1.Login := ´Seu_Login´;
ZMySqlDatabase1.Password := ´Sua_senha´;
ZMySqlDatabase1.LoginPrompt := False;

try
ZMySqlDatabase1.Connected := True;
ShowMessage(´Conexão com sucesso!´);
except
ShowMessage(´Não foi possível conectar-se ao servidor.´);
end;
end;

end.