Source position: MsgBox.pp line 23
type TmsgSelect = record
Caption: string;
Choice: TmsgChoice;
end;