Пример программы с unicode [Delphi, Windows]
kukuks © (2005-07-12 18:15:00)
Есть ли у кого пример программы на KOL с использованием
unicode.
1)прочитать файл путь которого содержыт unicode символи.
2)прочитать строку unicode текста.
3)показать ету строку в еditbox.
Или пожалуиста укажите на какую нибудь opensource программу
на delphi+KOL которая работает с unicode.
mdw (2005-07-13 15:39:00) [1]
А KOL причем? Примерно так:
var FS: PStream;
WC: PWideChar;
...
begin
FS:= NewReadFileStream('Filename')
GetMem(WC, FS.Size+2); FillMemory(WC, FS.Size+2, 0);
FS.Read(WC^, FS.Size);
еditbox.Text:= System.WideCharToString(WC);
FreeMem(WC, FS.Size+2);
FS.Free;
...
Наверх 
ЧАТ |
Орешник |
|
