Wie trenne ich die Verbindung?

[freak4fun]

Was heißt denn geht nicht? Stürzt dein PC jedes mal ab?

Jetzt wünsch ich mir auch eine Kristallkugel. Mindestens 21".

MfG
freak

[mgapski]

Nein, Abstürzen tut der net... der fliegt mir driekt um die Ohren....
Das Problem ist, das ich, obwohl ich die Verbindung eigentlich trenne,
ich immer noch sql-Anfragen ausführen kann... und das ist ja wohl nicht
Sin an der Sache...

n bisl Code hätt ich auch für euch

Delphi-Quellcode:

dbMain.Host:= edit1.Text;
dbMain.Login:= edit2.Text;
dbMain.Password:= edit3.Text;
dbMain.Database:= 'Meinedb';
dbMain.Connected:= true;

<--- Damit mach ich die Verbindung auf


dbMain.Connected:= false; <--- Damit wieder zu

Delphi-Quellcode:

qrMain.SQL.Text:='Select * from `SagIchNet` order by idx;';
qrMain.Open;

<--- geht aber immer noch

Ich hoffe das reicht an Infos.. wenn nicht... meckern ^^


MfG, Ich

[Stevie]

Hrmpf, manche Leute nennen sowas Komfort!
Wenn ein Zeos-DataSet (Query, Table, was auch immer) geöffnet wird, dann wird, falls eine Connection zugewiesen ist, diese automatisch auch geöffnet.

[mgapski]

Komfort?
Ich nene das zulassen einer Verbindung ohne zu Überprüfen
ob der User immer noch der selbe ist und das Recht hat sich
mit der Datenbank zu verbinden.

Wenn ich das Programm starte und

Delphi-Quellcode:

qrMain.SQL.Text:='Select * from `SagIchNet` order by idx;'; 
qrMain.Open;

ausführen will, kommt ne Fehlermeldung... ist ja auch richtig
so.
Wenn ich jedoch einmal verbunden bin und dann wieder die
Verbindung trenne, kann ja sein das ich nicht mehr vor
dem Rechner sitze... sei es weil das Programm noch was berechnet,
kann ich den Befehl trotzdem ausführen...

Es muss doch möglich sein das Zeos erneut die Login-Daten anfragt.... *verzweifel*


MfG, Ich

[Stevie]

1. Was wohl die Eigenschaft LoginPrompt macht? (aber wahrscheinlich hast du deinen eigenen Login-Dialog)
also
2. Im OnDisconnect Username, Password aus Connection löschen
Gibt aber wahrscheinlich nen Verbindungsfehler, also
3. Sauber Programmieren!
if ZConnection.Connected then {...}

[mgapski]

Mein Held!!!!!!

Es geht

Danke für die Hilfe



MfG, Ich