2015-06-03 17 views

回答

0

如果你想在表單上只是一個花形,考慮形狀的控件和此片段爲TRectangle的形式:

Rectangle1.Fill.Color := TAlphaColor(TAlphaColorRec.Aliceblue); 
Rectangle1.Fill.Kind := TBrushKind.Solid; 

此處投放的TAlphaColor適用於手機。

要設置顏色部分分開使用這個片段:

var 
    col: TAlphaColorRec; 
begin 
    col.R := 255; 
    col.G := 255; 
    col.B := 255; 
    col.A := 255; 
    Rectangle1.Fill.Color := TAlphaColor(col); 
    Rectangle1.Fill.Kind := TBrushKind.Solid; 
end;