TDelphiWriter

TWriter

OnFindAncestor

OnWriteMethodProperty

OnWriteStringProperty

TFiler

TObject