procedure TfrmFlash_SHX.FirmwareReplaceCG;
var
  i, k: integer;
  fName: TFileName;
  tmp: string;
begin
  if spSkinListView1.Selected = nil then exit;
  k:= integer(spSkinListView1.Selected.Data);
  if (k = -2) or (k = -1) or (k = 0) then
    begin
      i:= Form1.spSkinMessage1.MessageDlg(Format(fl_shx_t_text16, [#13#10, #13#10]), mtWarning, [mbYes, mbNo], 0);
      if i = mrYes then exit;
    end;

  OpenDialog1.DefaultExt:= '*.smg';
  OpenDialog1.Filter:= 'smg files|*.smg|bin files|*.bin|All files|*.*';
  OpenDialog1.FilterIndex:= 3;
  if not OpenDialog1.Execute then exit;
  fName:= OpenDialog1.FileName;
   if CG_Replace(k, fName) then
     begin
       //spSkinListView1.Selected.Caption:= '';
       spSkinListView1.Selected.SubItems[0]:= inttostr(ArrCGCreateFile[k].StartAddr);//'start';
       spSkinListView1.Selected.SubItems[1]:= inttostr(ArrCGCreateFile[k].StartAddr + ArrCGCreateFile[k].smgfilesize - 1);
       tmp:= Format('%s.%s',[IntToHex(ArrCGCreateFile[k].Signature[14], 2),
                             IntToHex(ArrCGCreateFile[k].Signature[15], 2)]);
       if (tmp = '00.00') or (tmp = 'FF.FF') then tmp:= ' ';
       spSkinListView1.Selected.SubItems[2]:= tmp;
       spSkinListView1.Selected.SubItems[3]:= inttostr(ArrCGCreateFile[k].smgfilesize);
       spSkinListView1.Selected.SubItems[4]:= ArrCGCreateFile[k].smgfilename;
     end;
end;