Головна сторінка
Top.Mail.Ru Яндекс.Метрика
Форум: "Основна";
Поточний архів: 2004.12.12;
Завантажити: [xml.tar.bz2];

Вниз

Перекодування в Unicod Знайти схожі гілки


kaktus   (2004-11-23 18:39) [0]

Було завдання перегнати текстовік в Unicode - є функція StringToWideString (...) - не виходить! Виходить що щось не зрозуміле, але ніяк не Unicode.



Суслик ©   (2004-11-23 18:41) [1]

є фукнція win api multibytetowidechar.

як юзати см. гуглом - прикладів багато.

на даному форумі періодично обговорюється.



clickmaker ©   (2004-11-23 18:43) [2]


> Kaktus (23.11.04 18: 39)
> Було завдання перегнати текстовік в Unicode - є функція
> StringToWideString (...) - не виходить

як користуєшся?



kaktus   (2004-11-23 18:54) [3]

сказати точно не погу тому як я в клубі-початківець з прогой будинку - а лупив все по helpe



demonSys   (2004-11-25 11:31) [4]

вилучено модератором
Примітка: Постав запитання у своїй гілці



kaktus   (2004-11-25 12:39) [5]

Відповідь ClickMaker-у:

procedure TForm1.Button1Click (Sender: TObject); var pwHandle: PWideChar; begin Edit1.Text: = StringToWideChar (Memo1.Text, pwHandle, Length (Memo1.Text)); end;

видає:
EAccsesViolation with message "Accses violation at adress BFF7F19D in module KERNEL32.DLL"



Anatoly Podgoretsky ©   (2004-11-25 13:35) [6]

Edit1.Text це не змінна а властивість, а того ж не Юнікод, а Ансі



kaktus   (2004-11-25 14:31) [7]

Все вийшло!!!!!!!!!!!!!!!!!!!
procedure TForm1.Button1Click (Sender: TObject); var StrSource, StrDest: string; I: Integer; Tmp: WideString; begin strSource: = Memo1.Text; Tmp: = StrSource; StrDest: = ""; for I: = 1 to Length (Tmp) do StrDest: = StrDest + "<" + IntToHex (Integer (Tmp [I]), 4) + ">"; Memo2.Text: = StrDest; end;



сторінки: 1 вся гілка

Форум: "Основна";
Поточний архів: 2004.12.12;
Завантажити: [xml.tar.bz2];

наверх









Пам'ять: 0.57 MB
Час: 0.099 c
4-1098771740
Artemius
2004-10-26 10:22
2004.12.12
Глюк при постановці в чергу друку.


14-1101107413
leonidus
2004-11-22 10:10
2004.12.12
Кто какую систему контролю версій використовує


14-1100874460
ceval
2004-11-19 17:27
2004.12.12
Підкажіть компонент для автозапуску програми


3-1100095157
Ліка
2004-11-10 16:59
2004.12.12
SQL запит


9-1091186589
OSG
2004-07-30 15:23
2004.12.12
Siege of Avalon !!!





африкаанс албанський арабська вірменин азербайджанець баскський білоруський болгарська каталонський Китайська (спрощене письмо) Китайський традиційний) хорватський чеська данську мову нідерландський Ukranian естонець Філіппінська фінську мову французький
галісійська грузинський німецький грецький гаїтянський креольський давньоєврейську хінді угорський ісландський індонезієць ірландський італійський японський корейський латиська литовець македонець малайський мальтійський норвежець
перс полірування португальська румунський російська сербський словацький словенський іспанська суахілі шведську мову тайський турецька український урду в&#39;єтнамський валлійський ідиш бенгальський боснійський
кебуано есперанто гуджараті хауса хмонг ігбо яванський каннада кхмерская Лао латинь маорі маратхі монгольський непальська панджабі сомалійський тамільська телугу йоруба
зулуський
Англійська Французький Німецький Італійський Португальська Русский Іспанська