AppendRVFfromStream into Table Cell

Return to index

Author

Message

Иван

Posted: 10/04/2003 15:55:08

on "nil" as TRVBackGround compiler wrote "Types of actual and formal var parameters

must be identical"

programm text:

            table := TRVTableItemInfo(RV_dest.GetItem(0));

            Stream := TMemoryStream.Create;

            RV_src.SaveRVFToStream(Stream, False);

            Stream.Position := 0;

            Cell_data:=Table.cells[0,0].GetRVData;

            Cell_data.AppendRVFFromStream(Stream,0,clBlack,nil);

            Stream.Free;