Компонент TColorBox. Как сохранить и извлечь из файла пользовательский цвет (Custom)

unit Unit1;
 
interface
 
uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, ExtCtrls;
 
type
  TForm1 = class(TForm)
    ColorBox1: TColorBox;
    BtSave: TButton;
    BtLoad: TButton;
    Label1: TLabel;
    procedure BtSaveClick(Sender: TObject);
    procedure BtLoadClick(Sender: TObject);
    procedure ColorBox1Change(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;
 
Type
  MyColorBox=record
    Customcolor:TColor;
    Itemindex:integer;
  end;
var
  Form1: TForm1;
  F:file of MyColorBox;
  MyColor:MyColorBox;
 
implementation
 
{$R *.dfm}
 
procedure TForm1.BtSaveClick(Sender: TObject);
begin
  MyColor.ItemIndex:=ColorBox1.ItemIndex; //Сохраняем номер выбранного цвета
  MyColor.Customcolor:=ColorBox1.Items.IndexOf('clCustom'); // Это не работает!!! "clCustom" не существует похоже ------------
  AssignFile(F,'color.txt');
  Rewrite(F);
  Write(F,MyColor);
  CloseFile(F);
end;
 
procedure TForm1.BtLoadClick(Sender: TObject);
begin
  AssignFile(F,'color.txt');
  Reset(F);
  Read(F,MyColor);
  CloseFile(F);
  ColorBox1.ItemIndex := MyColor.Itemindex; //Извлекаем номер выбранного цвета
  // Как здесь обратиться к цвету Custom и заполнить его?   -------------------
end;
 
procedure TForm1.ColorBox1Change(Sender: TObject);
begin
  Label1.Font.Color:=ColorBox1.Selected;
end;
 
end.

Panel2.Update;