Hallo,
leider ist es aber so, dass nicht immer alles ganz einfach auf etwas neues umzustellen ist. Ich hatte ein ähnliches Problem. Die
BDE steht im Level 7 und die
ODBC im Level 5. Ich habe das Problem über die Registry gelöst. Bedingung ist ein erlaubter Schreibzugriff.
Die Procedure in den Programmstart stellen und die Sache ist erledigt. Übrigens hat auch Word 2007 ein Problem damit eine dbf Datei als Datenquelle zu akzeptieren, wenn Sie im Level über 5 ist.
Delphi-Quellcode:
Procedure BDE_registry;
var regist: TRegistry;
s : string;
i : integer;
begin
regist:=TRegistry.Create;
regist.RootKey:=HKEY_LOCAL_MACHINE;
if not regist.OpenKey('SOFTWARE\Borland\Database Engine\Settings\DRIVERS\DBASE\TABLE CREATE', false) then
begin
showmessage('Rechte nicht vorhanden');
regist.closekey;
regist.free;
exit;
end;
{Der Wert kann nur als String gelesen werden - sonst Fehlermeldung}
s:=regist.ReadString('LEVEL');
i:=StrToInt(s);
if i>5 then regist.WriteString('LEVEL','5');
regist.Free;
end;