اتصال DBTreeView و DBISAM

[taqawi]

دوستان من قبلا هیچ مشکلی با اتصال این دو نداشتم. اما امروز هر کاری کردم نتونستم این دو رو به هم متصل کنم.
به این قسمت گیر میده.




procedure TDTTableTree.CreateCloneDataSet;
begin
if DataSource.DataSet is TTable then
begin
FCloneDataSet := TTable.Create(nil);
with FCloneDataSet as TTable do
begin
DatabaseName := (Self.DataSource.DataSet as TTable).DatabaseName;
TableType := (Self.DataSource.DataSet as TTable).TableType;
TableName := (Self.DataSource.DataSet as TTable).TableName;
Active := True;
end;
end
else
raise Exception.Create(sDatasetIsNotTable);
end;



چون تیبل DBISAM از نوع TTable نیست. من این قسمت رو اینجوری تغییر دادم



procedure TDTTableTree.CreateCloneDataSet;
begin
if DataSource.DataSet is TDBISAMTable then
begin
FCloneDataSet := TDBISAMTable.Create(nil);
with FCloneDataSet as TDBISAMTable do
begin
DatabaseName := (Self.DataSource.DataSet as TDBISAMTable).DatabaseName;
// TableType := (Self.DataSource.DataSet as TTable).TableType;
TableName := (Self.DataSource.DataSet as TDBISAMTable).TableName;
Active := True;
end;
end
else
raise Exception.Create(sDatasetIsNotTable);
end;


اما بازم به اون خطی که کامنتش کردم گیر میده.
دوستان کسی نظری نداره؟