Wer weiß, wie der Paradox-Sprachtreiber der BDE zur Laufzeit aus einem Delphi-Programm geändert werden kann?
Announcement
Collapse
No announcement yet.
Ändern des Paradox-Sprachtreibers zur Laufzeit
Collapse
X
-
Hallo,
über die TSession-Methoden <b>GetConfigParams</b> und <b>ModifyDriver</b> sollte sich der Sprachtreiber austauschen lassen. In der ersten Methode wird eine Listbox mit den aktuellen Konfigurationsdaten gefüllt, das Beispiel der zweiten Methode habe ich jedoch nicht ausprobiert.
<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>
Comment