Create
(
TLazWriterXPM
)
pt
InternalWrite
(
TLazWriterXPM
)