![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Multi Languages StringGrid [D4, Win95/98, Win2k]
proc © (2002-08-03 14:12:00)Можно ли в StringGrid использовать в заголовке RUSSIAN_CHARSET, а в теле BALTIK_CHARSET?
Спасибо.
proc (2002-08-03 17:58:00) [1]Спасибо
Dimka Maslov (2002-08-03 16:44:00) [2]А ещё лучше будет, когда
Canvas.Brush.Color := StringGrid1.FixedColor;
Dimka Maslov (2002-08-03 16:43:00) [3]К примеру вот так:
procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer;
Rect: TRect; State: TGridDrawState);
var
Canvas: TCanvas;
begin
Canvas:=StringGrid1.Canvas;
if gdFixed in State then begin // отрисовывается заголовок
Canvas.Brush.Color := clBtnFace;
Canvas.Font.Charset:=RUSSIAN_CHARSET;
// в Object Inspector StringGrid1.Font.Charset
// должно быть BALTIC_CHARSET
Canvas.TextRect(Rect, Rect.Left+2, Rect.Top+2, StringGrid1.Cells[ACol, ARow]);
end;
end;
Dimka Maslov (2002-08-03 16:35:00) [4]Можно, обрабатывая прорисовку ячеек вручную через событие OnDrawCell