+ introduced the TOmfRecord_COMENT_Subtype abstract class

git-svn-id: trunk@42235 -
This commit is contained in:
nickysn 2019-06-14 23:26:37 +00:00
parent 9fe80d7416
commit 85684eb66d

View File

@ -329,6 +329,14 @@ interface
property NoList: Boolean read GetNoList write SetNoList;
end;
{ TOmfRecord_COMENT_Subtype }
TOmfRecord_COMENT_Subtype = class
public
procedure DecodeFrom(ComentRecord: TOmfRecord_COMENT);virtual;abstract;
procedure EncodeTo(ComentRecord: TOmfRecord_COMENT);virtual;abstract;
end;
{ TOmfRecord_LNAMES }
TOmfRecord_LNAMES = class(TOmfParsedRecord)