在上次參加iOS Dev Club開發聚一直飲恨的地方是沒辦法Demo Android版本的程式出來,因為手中的Android手機是版本2.1的HTC EVO 4G,在Embarcadero的官方網站中有提到Target Android Versions要在2.3.3之後才行(大哭….)。今天終於心一橫跑到了大陸有名的網站 ROM之家 找到 HTC EVO 4G的ROM然後刷機了!
5.回到Panel元件,設定Position的X ,下拉選擇 Create New TFloatAnimation
6.接著在SpeedButton 的 OnClick事件
[pascal]
var
FloatAnimationX: single;
begin
FloatAnimationX:=Self.ClientWidth – 60;
if (panel1.Position.X=FloatAnimationX) then begin
FloatAnimation1.StartValue:= FloatAnimationX;
FloatAnimation1.StopValue:= 0;
end
else begin
FloatAnimation1.StartValue:= 0;
FloatAnimation1.StopValue:= FloatAnimationX;
end;