Показать сообщение отдельно
  #9  
Старый 29.10.2012, 13:56
Аватар для poli-smen
poli-smen poli-smen вне форума
Профессионал
 
Регистрация: 06.08.2012
Адрес: Кривой Рог
Сообщения: 1,791
Версия Delphi: Delphi 7, XE2
Репутация: 4415
По умолчанию

Цитата:
Сообщение от 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;
Нет. С этим обработчиком всё нормально (и с CompaniesStringGridDblClick тоже).
Какие ещё есть обработчики у этого StringGrid'а?

ps Какая версия Delphi?
Ответить с цитированием