Извините, ничего не найдено.

Не расстраивайся! Лучше выпей чайку!
Регистрация
Справка
Календарь

Вернуться   forum.boolean.name > Поиск по форуму

Показано с 1 по 1 из 1.
На поиск затрачено 0.00 сек.
Поиск: Сообщения от: Scader
Раздел: Основной форум 22.10.2008, 13:07
Ответов: 48
Просмотров: 24,513
Автор Scader
Ответ: Re: Конвертирование кодировки utf для отобра

function trans(s: string):string;
var s1: string;
gc: integer;
begin
s1:='';
for i:=0 to length(s) do
begin
gc:=ord(getChar(s,i));
if (gc>223) then
begin
Показано с 1 по 1 из 1.

 

Часовой пояс GMT +4, время: 11:38.


vBulletin® Version 3.6.5.
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Перевод: zCarot
Style crйe par Allan - vBulletin-Ressources.com