Kein Connect zu MySQL-DB zur Runtime

[Captnemo]

Hi,

ich versuche mit folgendem Code einen Connect zu einer MySQL-DB aufzubauen. Klappt aber nicht, und es kommt auch keine Fehlermeldung.
Baue ich die Verbindung über die OI mit exakt den gleichen Parametern auf, kann ich problemlos connecten. Hat irgendwer eine Idee, woran das liegen könnte?

Code:

  sdtbs1.LoginPrompt := False;
  sdtbs1.ServerType := stMySQL;
  sdtbs1.SessionName := 'Default';
  sdtbs1.DatabaseName := 'GMManuell';
  sdtbs1.Params.Clear;
  sdtbs1.Params.Add('USER NAME='+dbuser);
  sdtbs1.Params.Add('PASSWORD='+dbpass);
  sdtbs1.RemoteDatabase := dbhost+':gm';
  sdtbs1.Connected:=True;
  ShowMessage('Connected: '+BoolToStr(sdtbs1.Connected, True));

mit dem gleichen Code mache ich das in einem Dienst, wo der connect problemlos klappt.
Der einzige Unterschied ist, dass ich im Dienst die das Databaseobject selber erzeugen und im Programm halt auf der Form zu liegen habe.
Aber da es in der anderen Anwendung funktioniert, muss es ja an mir liegen.

[Bernhard Geyer]

MySQL - Hast du evtl. mehrer inkompatible mysqllib.dll auf deinem System installiert?

[baumina]

Irgendwie habe ich das Gefühl, dass da der hostname fehlt.

[Captnemo]

Zitat von baumina:

Irgendwie habe ich das Gefühl, dass da der hostname fehlt.

Hostname wird bei SQLDirect in RemoteDatabase angegeben: Hostatabase z.b. '192.168.0.10:test'. Die IP wird auch korrekt in RemoteDatabase eingetragen.

Zitat von Bernhard Geyer:

MySQL - Hast du evtl. mehrer inkompatible mysqllib.dll auf deinem System installiert?

Liegt in c:\Windows\System32, heißt alle Programm greifen auf die gleichen DLL's zu. Wie gesagt, bei einem anderen Projekt mit exakt den gleichen Parametern auf den gleichen Rechner läuft problemlos, auch beim Kunden. Irgendwie raff ich nicht, wo der Fehler liegen könnte. GetLastOSError liefert "Der Vorgang wurde erfolgreich beendet". Wo bei ich nicht weiß, ob sich diese Aussage auf meinen Connect-Versuch bezieht.
Interessanterweise für LoginPrompt:=True nicht dazu, dass ein Loginprompt kommt, sondern auch zu oben genannten Effect: schlicht kein Connect ohne Fehlermeldung.

[Sir Rufo]

Manchmal liegt es auch an der Reihenfolge.

Pauschal würde ich das Leeren der Parameter an den Anfang setzen und dann all Eigenschaften bestücken.

[Captnemo]

Ich habe grad mal ausprobiert, wenn ich alle Einstellungen der TSDDatabase im OI setze, kann ich dort manuell Verbinden.

Wenn ich nun alle im Code vorhandenen DB-Operationen auskommentiere (Parametersetzen und Connect), also nur die Einstellungen nutze die ich im OI gemacht habe, und dann die Anwendung starte, bin ich wieder disconnected.

@SirRufo: Das probiere ich gleich noch mal aus.

[p80286]

Zitat von Captnemo:

Interessanterweise für LoginPrompt:=True nicht dazu, dass ein Loginprompt kommt, sondern auch zu oben genannten Effect: schlicht kein Connect ohne Fehlermeldung.

Irgendwann in der fernen Delphi-Historie gab es da mal eine Änderung im Verhalten. Vorher kam der Login-Promt automatisch, dann mußte er per Hand/Programm aufgerufen werden. Ist aber von Komponente zu Komponente unterschiedlich soweit ich weiß.

Gruß
K-H

[Captnemo]

Es geht jetzt. Was am Ende dieses Verhalten hervorgerufen hat, kann ich euch nicht sagen.
Nachdem auch das Entfernen der Komponente und aller Verweise, und komplettes neuimplementieren der Komponente auch nichts brachte, habe ich das Projekt (ist noch ganz frisch) komplett neu aufgesetzt, schnell die Prozeduren und Funktionen neu erstellt, und den Quellcode aus dem nicht funktionierenden Projekt reinkopiert. Und schwups lief es.