Русский язык в win2000 server

← →
Карелин Артем © (2002-08-30 18:03) [0]

Проблема такая: формирую строку на русском языке и через буфер обмена и OLE пихаю в ексель. Так вот там выводится на русском только в том случае, если я ставлю шрифт b52. Причем это происходит, когда я вставляю через буфер в любую программу русский текст, сформированный из проги.
Что делать?

← →
Reindeer Moss Eater (2002-08-30 18:06) [1]

Например перед копированием в буфер смени keyboard layout на русскую

← →
Карелин Артем © (2002-08-30 18:07) [2]

Может другое есть решение?

Вот как обесчал нашел кое что в своих архивов, остальное не сохранилось

++++++++++++++++

А для Win 9x полезна такая вещь как CF_LOCALE.

С уважением: Александр Люлин ( http://everesteditor.chat.ru)

P. S. Пример. Для тех кто поймет.

if (Format = cf_Text) then begin
if (Win32Platform = VER_PLATFORM_WIN32_NT) then begin
MemUnicode := Tl3MemoryPool.Create(Self);
try
MemUnicode.Size := Mem.Size * 2;
MultiByteToWideChar(CP_RussianWin, 0, Mem.AsPointer, Mem.Size,
PWideChar(MemUnicode.AsPointer), Mem.Size);
SetClipboardData(cf_UnicodeText,
l3System.ReleaseHandle(MemUnicode.ReleaseHandle));
SetClipboardData(Format,
l3System.ReleaseHandle(Mem.ReleaseHandle));
finally
l3Free(MemUnicode);
end;{try..finally}
end else begin
SetClipboardData(Format,
l3System.ReleaseHandle(Mem.ReleaseHandle));
SetClipboardData(cf_Locale, Lang_Russian);
end;{..VER_PLATFORM_WIN32_NT..}
end // Format = cf_Text
+++++++++++++++++++

Русский язык в win2000 server Найти похожие ветки