TWideStriblist kann nicht zu TStringlist zugewiesen werden

[Smiley]

Ich habe in der DLL und im aufrufprogramm die Variable als TObject angelegt.
Beim Aufruf greife ich als TStringlist zu.

es erscheint folgende Meldung:
[Pascal Fehler] uMainReadTest.pas(237): E2033 Die Typen der tatsächlichen und formalen Var-Parameter müssen übereinstimmen

Delphi-Quellcode:

Procedure DBListTables(var Liste:TObject);
  external DllPath;
.
.
procedure TForm1.btnListTablesClick(Sender: TObject);
var
  xListe:TStringList;
//  i:Integer;

begin
  lstTables.Clear;
  xListe:=TStringList.Create;
  DBListTables(xListe);
  lstTables.Items:=xListe;
.
.