Головна сторінка
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.56 MB
Час: 0.099 c
6-1096695984
Ivolg
2004-10-02 09:46
2004.12.12
передача


3-1100619712
~ Blade ~
2004-11-16 18:41
2004.12.12
Оновлення таблиці в адо


1-1101877338
Shtukos
2004-12-01 08:02
2004.12.12
З деяких пір Delphi 7 не запускається, а видає вікно


1-1101366523
Павло
2004-11-25 10:08
2004.12.12
Формат файлів bpl, dcp, dcu


8-1094539043
serg128
2004-09-07 10:37
2004.12.12
Як зацикліть TMediaPlayer?





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