Como saber si mi servidor de MySQL esta activo o corriendo.

[rgstuamigo]

Hola Queridos colegas,mi duda es: ¿como puedo hacer para saber si mi servidor MySql esta activo o corriendo desde mi aplicacion Delphi 7 ?:confused:.Esto lo digo para no cometer errores de conexion al hacer alguna operacion en mi aplicacion.
Les agradesco de antemano sus respuestas.....;) ..
Saludos.....

[enecumene]

Hola,

http://www.clubdelphi.com/foros/showthread.php?t=37682

Saludos.

[rgstuamigo]

Gracias Enecumene por el link , aunque con tantas opciones a veces te confunden por cual usar o cual es la mejor. Pero tengo una duda ¿Sera que esos metodos que nos ofrece ahí seoane y roman sirven si el servidor esta en otro host?:confused: Me refiero que si sirven para hacerlo remotamente o como lo hago?:confused:

[roman]

Yo creo que lo normal es que el servicio tenga el nombre por defecto y, de no ser así, estará documentado y tu aplicación lo sabrá. Por tanto, lo más adecuado es usar las funciones que da seoane en el mensaje #4 (http://www.clubdelphi.com/foros/showpost.php?p=168599&postcount=4) de ese hilo.

// Saludos

[rgstuamigo]

ok roman, pero dime ¿me serviría para hacerlo remotamente? o solo funciona a nivel local?
En caso de ser solamente local,¿Como lo adaptaría para hacerlo remotamente?:confused:

[rgstuamigo]

Viendo otro hilo , encontre este codigo, pero lo adapte a mis necesidades utilizando Telnet:

uses IdTelnet...
.
.
.
.
procedure TForm1.Button6Click(Sender: TObject);
var t:TIdTelnet;
begin
t:=TIdTelnet.Create(self);
try
t.Host:='Server';//Podria ser tambien la ip del Server
t.Port:=3306;
t.Connect();
ShowMessage('true');//Servidor corriendo
except
ShowMessage('falso');//Servidor no corriendo
end;
t.Disconnect;
t.Free;
end;