Текущий архив: 2004.05.23;
Скачать: CL | DM;

Вниз

StringToWideChar   Найти похожие ветки 

← →
Unicode ©   (2004-05-07 14:31) [0]

что я делаю не правильно?
var
PWS:PWideChar;
begin
PWS:=StringToWideChar(Edit1.Text,PWS,SizeOf(PWS))
end

итога Access Violation :(

---

← →
Игорь Шевченко ©   (2004-05-07 14:33) [1]

var
 Buffer: array[0..1024] of WideChar;
 PWS: PWideChar;
begin
 PWS := StringToWideChar(Edit1.Text,Buffer,SizeOf(Buffer));
end;

И будет тебе счастье

---

← →
Игорь Шевченко ©   (2004-05-07 14:41) [2]

!

---

← →
Unicode ©   (2004-05-07 14:50) [3]

Игорь дело в том что у меня вместо Edit1 TntEdit

в итоге получеться ???? использую для вывода MessageBoxW

---

← →
Игорь Шевченко ©   (2004-05-07 14:56) [4]

Unicode ©   (07.05.04 14:50)

Тогда зачем преобразовывать ? Разве у TNtEdit свойство Text не WideString ?

Может, MessageBoxW(..., PWideChar(Edit1.Text), ...) ?

---

← →
Unicode ©   (2004-05-07 14:58) [5]

ага сработало .. спасибо..

---

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

Текущий архив: 2004.05.23;
Скачать: CL | DM;

Наверх

Память: 0.47 MB
Время: 0.039 c