●チェック横向き({グループ}Cを)
  nとは整数。wndとは整数。iwとは整数。ihとは整数
  n = C→アイテムの配列要素数;
  wnd = GetTopWindow(C→ハンドル);
  iw = (C→W-10)/n;
  ih = (C→H)-20;
  (n)回
    MoveWindow(wnd, (n-回数)*iw+5, 15, iw, ih, 1);
    wnd=GetWindow(wnd, GW_HWNDNEXT);
  戻る

# 本来ならなでしこがVCLコンポーネントのpublishedなプロパティにアクセスする手段を
# 提供してくれるのが一番なんだけどね〜。クジラ氏はTypInfoあたりに詳しくないのかな?