Source position: msegui.pas line 3296
procedure writewidgetnames(
const writer: twriter;
const ar: widgetarty
);