Wie zuverlässig bei IBDatabase Connect verhindern?

[WoGe]

Hallo
Wie verhindere ich dauerhaft, das bei IBDatabase im Objectinspector das Häkchen bei connected gesetzt wird?
Ich lade normalerweise aus einem Ini-File Server + Datenbankname
und connecte dann. Da funktioniert auch gut.
Aber, ab und zu setzt sich das Connection-Häkchen automatisch. Wenn ich das Programm dann auf dem Zielrechner einsetze - gibts einen Programmabsturz.

Grüsse
wo

[Neumann]

Das würde mich auch interessieren, habe auch dieses Problem.

Zur Zeit behelfe ich mir damit, dass ich eine ungültigen Dateinamen eintrage. Aber auch das kann man vergessen. Hilft aber, wenn irgendwelche Zugriffskomponenten auf active stehen, dann kommt die Exeption wenigstens bei mir und nicht beim Kunden.

Gruß

Ralf

[Ralf Kaiser]

Bei den GExperts (und auch bei den CNWizards, wenn ich mich recht erinnere) gibt es Experten die es erlauben bestimmte Eigenschaften aller Komponenten vor dem Speichern bzw. vor den Kompillieren auf definierte Werte zu setzen, als z.B. Connectd=false für Datenbank-Komponenten oder Active=false für Tabellen usw.

[mjustin]

Ein Weg wäre die Erstellung einer abgeleiteten Komponenten, die den Wert der Connected Property generell nicht speichert ("stored false") oder SetConnected überschreibt. Nur als Denkanstoss, alternativ kann man einen der Experten in GExperts dazu nutzen, der die Komponentenproperties beim Speichern setzt: http://www.gexperts.org/tour/setcomp...roperties.html

[shmia]

Ich glaube dass sich daran nichts ändern lässt (ausser in der IBDatabase-Komponente selbst).
Bei der ADOConnection habe ich genau das gleiche Problem:
wenn man zur Entwicklungszeit testweise eine Query öffnet wird automatisch auch die ADOConnection (bzw. IBDatabase) geöffnet.
Als Entwickler merkt man das nicht und so gibt es "draussen" immer wieder mal Probleme. :wall:

Ich habe bei mir etwas eingebaut, damit ich zumindest gewarnt werde, falls die Connection schon öffen ist:

Delphi-Quellcode:

procedure TMainDataModule.MainDataModuleCreate(Sender: TObject);
begin
   // Falls die ADO Connection schon verbunden ist, liegt ein Problem vor.
   if ADOCon.Connected then
   begin
      ShowMessage('Warnung: ADOConnection ist schon aktiv !!!');
   end;

   // Connection-Parameter laden
   ....
  ADOCon.Connected := True;  // Datenbankverb. öffnen

[dataspider]

Hi,

man könnte ein Private Field z.B. FCanConnect: Boolean deklarieren.
Dann in BeforConnect der IBConnection eine stille Exception:

Code:

if not FCanConnect then
  Abort;

Das sollte eigentlich funktionieren.

Frank

[WoGe]

Vielen Dank,
der Hinweis auf GExperts hat geholfen.
Der entsprechende Experte ist standardmäßig nicht aktiviert, deswegen kannte ich den garnicht.

Grüsse
wo