Форум: "Основная";
Текущий архив: 2003.02.20;
Скачать: [xml.tar.bz2];

Вниз

Печать   Найти похожие ветки 

← →
shodan   (2003-02-11 14:54) [0]

Привет всем мастерам!
Вопрос: как распечатать строку типа WideString? (Unicode)

---

← →
MBo   (2003-02-11 14:55) [1]

А как ты узкие строки печатаешь?

---

← →
shodan   (2003-02-11 15:01) [2]

Printer.canvas.TextOut(x,y,str:string);

---

← →
MBo   (2003-02-11 15:08) [3]

на принтер не пробовал, а так работает

var ws:widestring;
begin
ws:="ФЫВАпролдж123";
Canvas.TextOut(10,10,ws);
TextOutW(Canvas.Handle,10,40,PWideChar(ws),length(ws));

---

← →
shodan   (2003-02-11 15:19) [4]

TextOutW откуа?

---

← →
MBo   (2003-02-11 15:21) [5]

из windows.pas

---

← →
shodan   (2003-02-11 15:26) [6]

PWideChar(ws), Ругается - на WideString а нужно именно WideString

---

← →
MBo   (2003-02-11 15:28) [7]

У меня не ругается. Дельфи 5.
так тоже можно
PWideChar(@ws[1])

---

← →
shodan   (2003-02-11 15:32) [8]

Спасибо Большое, все получилось...
TextOutW(Printer.Canvas.Handle,0,Px,
PWideChar(TnTRichEdit1.Lines.Strings[ii]),Length(TnTRichEdit1.Lines.Strings[ii]));

---

Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2003.02.20;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.45 MB
Время: 0.007 c