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