各位先進們大家好，我使用的開發工具是 BCB4，我在使用 TPageScroller 這個元件時碰到一個問題如下：    我想要做出類似 BCB IDE 環境裡的元件盤 (Component Palette) 效果，若是元件盤上的元件按鈕項目過多而超過顯示範圍時，元件盤會在左方或是右方動態顯示出一個箭頭按鈕 (如下圖兩側以明亮橢圓形標示的區域)，每次點選箭頭按鈕一次時，會捲動一個按鈕的位移量。     我想使用 TPageScroller 及 TToolBar 元件來達到上述的動作，但是我現在做出來的結果是每點選一次調整位移量的箭頭按鈕時，TPageScroller 元件內的按鈕卻是一次捲動多個按鈕的位移量，我應該要如何設定才能做到像 BCB 元件盤一般，每點選一次就僅捲動一個按鈕的位移量？

你好： 這是我在BCB6.0做的方法。給你參考看看 在TPageScroller有一個事件OnScroll，輸入下面程式

void __fastcall TForm1::PageScroller1Scroll(TObject *Sender,
      TShiftState Shift, int X, int Y,
      TPageScrollerOrientation Orientation, int &Delta)
{
        if (Delta > 0)
              Delta = 1; //向左移動
        else
              Delta = -1; //向右移動
}    

以上程式會以平滑方式捲動，如何要一次捲動一個按鈕，請將1改成按鈕的寬度或高度。 修正：好像不管是往左移、往右移，Shift似乎都一直是ssLeft? 因此我改用判斷Delta是為正數或負數? 發表人 - liangnet 於 2004/12/02 11:04:33

liangnet 您好： 我依據您提供的參考資料，試過的結果雖然仍有問題，但我猜想是其它的設定所影響的 (這個元件怪怪的，Help 裡的相關參考資訊又不多，可能需要多方測試才能獲得正確結果，例如其內元件的 Align 屬性似乎不能設為 AlClient...等等)，您提供的方式應該沒問題，多謝您的協助。