FR ботает на иврите

отредактировано 08:44 Раздел: FastReport 2.xx VCL
На одном из принтеров FR при печати вместо русских букв использует израильские.
Чем горю помочь? Как не прослыть юдофобом? ;)
Версия официальная, 2.51.
Принтер HP 1300.

Комментарии

  • SlvSlv
    отредактировано 08:44
    Необходимо принудительно в фонтах отчета указать кирилицу.
  • отредактировано 08:44
    С уверенностью могу сказать: не помогает. Но!
    Работают два проверенных способа:
    1)Отключение оптимизации в настройках принтера.
    2)Поголовный переход отчетов на MS SansSerif (может, и другие шрифты есть).

    Вот-с!
  • отредактировано November 2004
    ;) долго копался, но, вроде, нашел!!!
    в модуле FR_CLASS надо дописать:
    procedure TfrMemoView.AssignFont(Canvas: TCanvas);
    begin
    with Canvas do
    begin
    SetBkMode(Handle, Transparent);
    Font := Self.Font;
    Font.Charset := RUSSIAN_CHARSET; //добавлено мною
    if not IsPrinting then
    if ScaleY = 1 then
    Font.Height := -Round(Font.Size * 96 / 72 * ScaleY) else
    Font.Height := -Trunc(Font.Size * 96 / 72 * ScaleY);
    end;
    end;

    заработало! ;)

Оставить комментарий

Многофункциональный текстовый редактор. Чтобы отредактировать стиль параграфа, нажмите TAB, чтобы перейти к меню абзаца. Там вы можете выбрать стиль. По умолчанию не выбран ни один стиль. Когда вы выберете текст, появится встроенное меню форматирования. Нажмите TAB, чтобы войти в него. Некоторые элементы, такие как многофункциональные вставки ссылок, картинок, индикаторов загрузки и сообщений об ошибок могут быть вставлены в редактор. Вы можете перемещаться по ним, используя стрелки внутри редактора и удалять с помощью клавиш delete или backspace.