" ist kein gültiger integer wert...problem mit Zeos

[ICE-P]

Hallo erstmal,
ich hab da son problem...
...wenn ich mich zu einer mysql datenbank verbinden möchte

Delphi-Quellcode:

    
  ZConnection1.Database := 'Datenbankname';
  ZConnection1.HostName := 'Hostname';
  ZConnection1.Password := 'Passwort';
  ZConnection1.User := 'User';
  ZConnection1.Connected := true;

das kommt die fehlermeldung : " ist kein gültiger integer wert

weiß einer wie den fehler beheben kann?

[Treffnix]

Schau halt mal, wo genau die Exception ausgelöst wird, oder liegt bei Zeos der Source nicht bei. Vermutlich hast du irgendein Property ( Port? ) gar nicht oder falsch belegt.

[chrisw]

ich denke es fehlt ZConnection1.Port und ZConnection1.Protocol !

[ICE-P]

danke für die schnellen antworten., fehler leider immernoch da.

also protocol hab ich auch eingestellt mysql 4.0
und port hab ich auf 0 gelassen, allerdings hab ich auch schon mit anderen rumprobiert...

der fehler tritt auf, nachdem das connected := true durchgeführt wird.

[Treffnix]

Zitat von ICE-P:

danke für die schnellen antworten., fehler leider immernoch da.

also protocol hab ich auch eingestellt mysql 4.0
und port hab ich auf 0 gelassen, allerdings hab ich auch schon mit anderen rumprobiert...

der fehler tritt auf, nachdem das connected := true durchgeführt wird.

Hinter connected steckt mit Sicherheit ne Set-Methode. Haltepunkt auf connected := true und dann mit F7 mal in die Methode laufen und da weitergucken.

[RavenIV]

mach anstelle von
ZConnection1.Connected := true; lieber mal
ZConnection1.Connect; gruessle

[ICE-P]

@ravenIV...schade daran hats leider auch nicht gelegen.

kk, bin mal mit F7 weitergegangen und dann is er hier reingesprungen:

Delphi-Quellcode:

procedure TZConnection.SetConnected(Value: Boolean);
begin
  if (csReading in ComponentState) and Value then
    FStreamedConnected := True
  else
  begin
    if Value <> GetConnected then
    begin
      if Value then Connect       //hier tritt dann der Fehler auf...
      else Disconnect;
    end;
  end;
end;

weiß allerdings immernoch nicht, wieso das nicht funktioniert

[Stevie]

Klappt es denn, wenn du es im Designmodus machst? Welche Zeos-Version benutzt du?

[ICE-P]

Nee klappt auch nicht.
benutze die 6.5.1-alpha ... für Delphi 5

[Treffnix]

Zitat:

if Value then Connect //hier tritt dann der Fehler auf...

Dann drückste nochmal F7 und guckst, was in der Connect Methode schiefgeht, bis du die Stelle hast, wos wirklich passiert.
Und beschäftige dich mal hiermit: http://www.delphipraxis.net/internal...ct.php?t=47972