Головна сторінка
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.056 c
1-1101663123
serko
2004-11-28 20:32
2004.12.12
GetDir


8-1093948946
Сашок
2004-08-31 14:42
2004.12.12
Відступ від точок


1-1101484613
GOgo
2004-11-26 18:56
2004.12.12
заставка


14-1101145603
_Дельфін_
2004-11-22 20:46
2004.12.12
Підручник по WinAPI


1-1101885164
opoloXAI
2004-12-01 10:12
2004.12.12
Як роздрукувати TStrings в три стовпчики?





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