TSQLSchemaInfo = record
  FType: TSchemaType;
  ObjectName: UnicodeString;
  Pattern: UnicodeString;
  PackageName: UnicodeString;
end;

struct TSQLSchemaInfo {
  TSchemaType FType;
  UnicodeString ObjectName;
  UnicodeString Pattern;
  UnicodeString PackageName;
};