Create (TfpgReadOnly)