Текущий архив: 2010.08.27;
Скачать: CL | DM;
Вниз
Помогите ! Проблема с выводом текст на принтер Найти похожие ветки
← →
Officeman (2010-02-28 14:31) [0]Вывожу на принтер содержимое Memo
var
Prn: TextFile;
k: Integer;
begin
AssignPrn(Prn);
Rewrite(Prn);
Printer.Canvas.Font := Memo1.Font;
for k := 0 to Memo1.Lines.Count-1 do
WriteLn(Prn, Memo1.Lines[k]);
CloseFile(Prn); // Аналог EndDoc
end;
какбы разметка соответствует действительности но вместо русских символов выводятся какието ЯПОНСКИЕ :((((((((((
добавлялPrinter.Canvas.Font.Charset := 204;
всёравно печатаются ЯПОНСКИЕ. заместо пробелов пустые квадратики
помогите чем можете. срочно нужно реализовать печать с memo
с Уважением.
← →
Officeman (2010-02-28 14:34) [1]вопрос снят. Delphi RAD 2009 тупит. в других версиях дельфи нормально.
извините.
← →
Игорь Шевченко © (2010-02-28 16:43) [2]Удалено модератором
← →
Officeman (2010-02-28 17:14) [3]не ругаемся
← →
KilkennyCat © (2010-02-28 18:46) [4]гы...
> Officeman
а может есть хоть тень сомненья, что тупит не Делфи? Хоть небольшая? Типа "а не я ли даун?"
Страницы: 1 вся ветка
Текущий архив: 2010.08.27;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.059 c
