Code: Select all
void TForm::AddHeader(TCustomRVFormattedData *aSrc, TCustomRVFormattedData *aDest)
{
TMemoryStream *ms = new TMemoryStream;
aSrc->SaveRVFToStream(ms, false, NULL, NULL, NULL);
ms->Position = 0;
aDest->InsertRVFFromStream(ms, aDest->ItemCount, NULL, NULL, NULL, false); //generates exception EClassNotFound
delete ms;
}
PS: Previously, I was setted RVData aSrc as my header of RVPrint.