{$ifdef WinCE}uses WinCEInt;{$endif} ... begin{$ifdef WinCE} WinCEWidgetset.WinCETitlePolicy := tpOKButtonOnlyOnDialogs;{$endif}end;