BDE-Konfigurationsparameter im Setup festlegen

[Stefan Schreier]

Ich möchte eine größere Anzahl an Client-Installationen vornehmen. Die Anwendung ist mit Delphi 5 entwickelt und greift über die BDE auf ORACLE 8i Datenbankserver zu. Nach der Installation auf dem Client sind in der BDE-Konfiguration folgende Werte gespeichert:
DLL32=SQLORA32.DLL
VENDOR INIT=ORA73.DLL
Wie kann ich das Setup-Programm ändern, das die für ORACLE 8i gültigen Einstellungen:
DLL32=SQLORA8.DLL
VENDOR INIT=OCI.DLL
in der BDE-Konfiguration als Voreinstellung gesetzt werden?

Danke.

[Andreas Kosch]

Hallo,

es gibt mindestens 2 Möglichkeiten: <br>
1. Registry-Eintrag vom InstallSHIELD schreiben lassen <br>
2. IDAPI-Funktion nachträglich aufrufen (eventuell bei jedem Programmstart prüfen, ob die richtigen Werte eingetragen sind) und das Programm neu starten.

Variante 1:
<pre>
[HKEY_LOCAL_MACHINE\SOFTWARE\Borland\Database Engine\Settings\DRIVERS\ORACLE\INIT]
"VERSION"="4.0"
"TYPE"="SERVER"
"DLL32"="SQLORA32.DLL"
"VENDOR INIT"="ORA73.DLL"
"DRIVER FLAGS"=""
"TRACE MODE"="0"
</pre>

Variante 2 (Beispiel ändert die Sprache für den Paradox-Treiber):
<pre>
uses BDE, DBTables;

procedure TForm1.Button1Click(Sender: TObject);
var
aSL : TStringList;
begin
aSL := TStringList.Create;
try
Session.GetConfigParams('\DRIVERS\PARADOX\INIT', '%', aSL);
ListBox1.Items := aSL;
finally
aSL.Free;
end;
end;

procedure TForm1.Button2Click(Sender: TObject);
var
aSL : TStringList;
begin
aSL := TStringList.Create;
aSL.Add('LANGDRIVER=xxx');
try
Session.ModifyDriver('PARADOX', aSL);
Session.SaveConfigFile;
finally
aSL.Free;
end;
end;
</pre&gt

[Stefan Schreier]

Hallo Herr Kosch!

Vielen Dank für die Lösung. Das wunderbar funktioniert!

Gruß Stefan Schreie