| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
При печати шрифт меняется на абракадабру [D6, Win95/98]
vasilevs2000 © (2002-05-22 07:23:00)Delphi6
Отчет на quickreport
Принтер Lexmark
При предосмотре русские буквы нормальные
а на распечатке абракадабра
В чем дело не ясно?
Андрей__ (2002-05-24 14:46:00) [1]У меня была такая проблема с принтером Xerox. Шрифт(не помню какой точно) размером 10 печатался нормально, а 8 уже давал всякие зюки. Поменял на другой и все стало нормально. Менять шрифты программно никчему, можно на форме репорта нажать правую кнопку мыши, выбрать Report Settings, и выбрать шрифт, шрифт изменится для ВСЕХ компонентов.
VadimBulatov (2002-05-23 15:52:00) [2]У меня тоже была такая проблема.И думаю, что модель принтера здесь ни причем.
Вышел из нее следующим образом :
всем компонентам на Quikreport-е(все компоненты имеющие надпись:QRlabel,QRDBlabel и т.д.) программно задаю общеупотребляемый шрифт например ArialCyr,Arial.
(Например делать это перед предосмотром или печатью)
делается это так:
//form1 - форма на которой расположен TQuickRep
for i:=0 to form1.ComponentCount-1 do
begin
if (Form1.Components[i]).ClassType=TQRLabel then (Form1.Components[i] as TQRLabel).Font.Name:="arialcyr";
if (Form1.Components[i]).ClassType=TQRDBText then (Form1.Components[i] as TQRDBText).Font.Name:="arialcyr";
end;
Жду сообщения о результате!
Hiqwer (2002-05-22 17:05:00) [3]Это который Lexmark?
Не Lexmark 2390 (IBM)?
Explorer (2002-05-22 08:53:00) [4]>vasilevs2000
посмотри Шрифты формы на которой лежит отчет.
Выставь Charset - RUSSIAN_CHARSET
Должно помочь.
| |
