【Delphi Multi-Device Application】 Menu選單

在畫面放置 [MultiView] ，再放置 [Button] 做事件觸發用，放置 [ShadowEffect] 在 [Multiview] 裡可以使 MultiView 有陰影的效果

在 MultiView屬性設定

  MasterButton 指向 Button1

  Mode 設定為 Drawer

MultiView設定

Button.StyleLookup 可以用來設定按鈕上的圖示

如果要做到 Button 觸發時，圖示轉動效果可以在 Button.OnClick 事件處理

--------------------

Button.OnClick

--------------------

  if button1.Tag=1 then

  begin

    Button1.AnimateFloat('RotationAngle', 0, 0.5);

    button1.Tag := 0;

  end

  else

  begin

    Button1.AnimateFloat('RotationAngle', 180, 0.5);

    button1.Tag := 1;

  end;