Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

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


Наверх

Титульная страница Поиск, карта сайта Написать письмо