TWideStriblist kann nicht zu TStringlist zugewiesen werden

[Smiley]

Delphi-Quellcode:

procedure TForm1.btnListTablesClick(Sender: TObject);
var
  xListe:TStringList;
//  i:Integer;

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