我剛打算做由黑變白的背影，但發現了一個問題 form1.Color:=00000000;==>只能用數字，沒法用ffffffff 那我該怎麼做出效果，由白變黑的效果呢？

bcshahuo您好： 这是不是您要的： form1.Color:=$00FFFFFF; Tcolor的取值范围：TColor = -$7FFFFFFF-1..$7FFFFFFF;可参考在线说明档 另form1.Color也可写成：clBlack，clNone等等，试试看 ~~~静心养德~~~ 發表人 - deity 於 2005/01/25 17:31:04

引言: bcshahuo您好： 这是不是您要的： form1.Color:=$00FFFFFF; Tcolor的取值范围：TColor = -$7FFFFFFF-1..$7FFFFFFF;可参考在线说明档 另form1.Color也可写成：clBlack，clNone等等，试试看 ~~~静心养德~~~ 發表人 - deity 於 2005/01/25 17:31:04

謝謝，這是我要的。 可以再請問一下，如果我要由白轉黑，或黑轉白 有什麼方法呢？

引言: bcshahuo您好： 这是不是您要的： form1.Color:=$00FFFFFF; Tcolor的取值范围：TColor = -$7FFFFFFF-1..$7FFFFFFF;可参考在线说明档 另form1.Color也可写成：clBlack，clNone等等，试试看 ~~~静心养德~~~ 發表人 - deity 於 2005/01/25 17:31:04

謝謝，這是我要的。 可以再請問一下，如果我要由白轉黑，或黑轉白 有什麼方法呢？ 不好意思，我想，我表達錯誤了@@，歹勢 我是想問 由黑變白，是慢慢變的那種。 就像由黑銀幕轉為白銀幕時的那種場影變換。 謝謝。

拉一个Timer，键入如下代码试试

 
procedure TForm1.Timer1Timer(Sender: TObject);
begin
  Form1.Color:=$00FFFFFF;  //一定时间后转为白
end;    procedure TForm1.FormCreate(Sender: TObject);
begin
  Form1.Color:=$00000000;  //默认为黑
end;
试试看
    <>~~~静心养德~~~