[rinaldo]

[Theme]
;Interface either be in dark or light
;Colors are Originally from OS Windows Phone 8 (01-20)
;Color random (21)
Image=1
Dark=1
Color=21

function MetroColor(Col: Integer): TColor;
begin
  case Col of
    01: Result:=$00C4A4;
    02: Result:=$17A960;
    03: Result:=$008A00;
    04: Result:=$A9AB00;
    05: Result:=$E2B11A;
    06: Result:=$EF5000;
    07: Result:=$FF006A;
    08: Result:=$FF00AA;
    09: Result:=$D072F4;
    10: Result:=$7300D8;
    11: Result:=$2500A2;
    12: Result:=$0014E5;
    13: Result:=$0068FA;
    14: Result:=$0AA3FF;
    15: Result:=$00C8E3;
    16: Result:=$2C5A82;
    17: Result:=$64876D;
    18: Result:=$877664;
    19: Result:=$8A6076;
    20: Result:=$2D52A0;
    21: Result:=random($FFFFFF);
  end;
end;