Announcement

Collapse
No announcement yet.

Ändern des Paradox-Sprachtreibers zur Laufzeit

Collapse
X
  • Filter
  • Time
  • Show
Clear All
new posts

  • Ändern des Paradox-Sprachtreibers zur Laufzeit

    Wer weiß, wie der Paradox-Sprachtreiber der BDE zur Laufzeit aus einem Delphi-Programm geändert werden kann?

  • #2
    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&gt

    Comment

    Working...
    X