Einzelnen Beitrag anzeigen

bLume

Registriert seit: 19. Sep 2004
9 Beiträge
 
#1

Unverständliches Problem mit TClientSocket

  Alt 19. Sep 2004, 18:56
also ich habe eine Funktion die einfach nur Checken soll ob ein MySQL Server vorhanden ist.

Delphi-Quellcode:
var
  zSocket: TClientSocket;

...

function mysql_check(target : string) : boolean;
begin
    zSocket.Host:=target;
    zSocket.Port:=3306;
    zSocket.Open;
    if zSocket.Active=True then begin
    zSocket.Close;
    result := true;
    end
    else
    result := false;
end;
Beim Compilen bekomme ich nun keinen Error, aber wenn ich die Funktion aufrufe kommt dieser Fehler:

Exception EAccessViolation in Modul iBot.exe bei 00019668.
Zugriffsverletzung bei Adresse 00419668 in Modul 'iBot.exe'. Lesen von Adresse 0
000003C.

ich habe keine ahnung woran es liegt
bitte helft mir !!!

mfg

bLume
  Mit Zitat antworten Zitat