Копирование классов

← →
VEZ (2005-12-16 10:10) [0]

procedure TfrmChannels.btLikeClick(Sender: TObject);
var
ChanData:TFrame;
begin
DoGetDevIOInterface(cbLike.Text,ChanData);
Self.Assign(TfrmChannels(ChanData));
cbLike.ItemIndex:=-1;
end;

При попопытке скопировать потомок фрейма в потомок фрейма выдаёт ошибку "Cannot assign TfrmChannels to a TfrmChannels".

← →
Digitman © (2005-12-16 11:54) [1]

следует перекрыть виртуальный метод AssignTo() и в его теле реализовать требуемую логику "копирования"

Копирование классов Найти похожие ветки