[sorockinalex]

в эвентах я только добавлял процедуру закраски жирным первого столбцай строки, на всех стринг гридах во всех модулях олна работает исправно.. может быть что в ней?:

Код:

procedure TFAddBranchCompany.CompaniesStringGridDrawCell(
  Sender: TObject; ACol, ARow: Integer; Rect: TRect;
  State: TGridDrawState);
begin
  //Жирный заголовок
  if ARow=0 then    (Sender as TStringGrid).Canvas.Font.Style:=[fsBold]
  else    (Sender as TStringGrid).Canvas.Font.Style:=[];
  (Sender as TStringGrid).Canvas.TextOut(Rect.Left+2,Rect.Top+2,(Sender as TStringGrid).Cells[ACol,ARow]);
end;