TEdit

← →
saha (2003-04-01 11:20) [0]

Привет!
Суть проблемы:
пишу
edit1.text:="привет";
edit1.selectAll;
edit1.CopyToClipboard;

вставляю, допустим, в word - ?????? какая-то херня в непонятной кодировке.
font для Edit Microsoft Sans Serif кириллический, charset - RUSSIAN_CHARSET, ставил и DEFAULT_CHARSET по-барабану.
А если ручками набрать прямо в edit "привет", выделить и скопировать, то все нормально. Че за фигня?

← →
Song © (2003-04-01 11:29) [1]

У вас w2k, и эта херня называется unicode

← →
saha (2003-04-01 12:03) [2]

Ну и как с этим мне жить дальше?

← →
Anatoly Podgoretsky © (2003-04-01 12:10) [3]

А это значит, что ты должен в буфер обмена поместить в формате unicode, а не ANSI или вместе с текстом поместить информацию, о кодовой странице.

← →
Zemal © (2003-04-01 12:48) [4]

Можно попробовать функцию OEMToChar(). Подозреваю что проблема в том что в TEdit текст храниться в OEM кодировке... я уже сталкивался с этим... достаточно преобразовать OEM в ANSI. Так что попробуй, может обойдёшься и без Unicode. Удачи!

← →
Kruger © (2003-04-01 12:51) [5]

у меня это на с++, но в принципе те же команды.
pas_edit->Text=FData->Base->FieldByName("Password")->AsString;
pas_edit->SelectAll();
pas_edit->CutToClipboard();
просто вместо -> :=
Все работет, у меня 2к

← →
Zemal © (2003-04-01 12:52) [6]

В общем смотри хелп по функциям OEMToChar и CharToOEM. Правда для совместимости с ранними версиями винды нужно проверять какая версия и если 95-98 то использовать аналоги EOMToANSI и ANSIToOEM. Это подарочек от мелкософта такой... взяли и имена поменяли... непонравилось наверное...

Kruger, у тебя работает только потому что у тебя мелкософтовский С++... там в поле Text класса TEdit данные хранятся сразу в ANSI-кодировке... в Делфи - OEM.

← →
saha (2003-04-01 14:00) [8]

Видно без unicode не обойтись.

>А это значит, что ты должен в буфер обмена поместить в формате >unicode, а не ANSI или вместе с текстом поместить информацию, о кодовой странице.

ну и как же ему родному сказать про кодовую страницу?
или как перекинуть в unicode?

(я вижу это популярный сегодня вопрос, у zee те же проблемы)

В демках, прилагаемых к Delphi я видел прогу, которая перекидывает текст из эдита в word. Посмотри ее. Там все нормально перемещается...

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