Пример программы с unicode

← →
kukuks (2005-07-12 18:15) [0]

Есть ли у кого пример программы на KOL с использованием unicode.
1)прочитать файл путь которого содержыт unicode символи.
2)прочитать строку unicode текста.
3)показать ету строку в еditbox.
Или пожалуиста укажите на какую нибудь opensource программу на delphi+KOL которая работает с unicode.

← →
mdw © (2005-07-13 15:39) [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;
...

Пример программы с unicode Найти похожие ветки