Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 11.11.2010, 18:18   #21
xrob
Форумчанин
 
Регистрация: 18.10.2010
Сообщений: 419
По умолчанию

как то жутковато выглядит описание массива в FormCreate...
хотя вы наверно правы, такое имеет смысл делать,
но смотрится страшно, особенно если в delphi 7 делать и свернуть нельзя...
прикинь такой кодик пролистывать?
я так делал что-то подобное для перекодировки из utf-8 в ansi
xrob вне форума Ответить с цитированием
Старый 11.11.2010, 18:21   #22
dmitriegorovih
Ещё не
Форумчанин
 
Аватар для dmitriegorovih
 
Регистрация: 04.01.2010
Сообщений: 517
По умолчанию

Цитата:
Пепел Феникса
Я всегда хочу наиболее оптимально писать прогу но получается как всегда, громоздко, прога вроде работает я тестил её.
Цитата:
я так делал что-то подобное для перекодировки из utf-8 в ansi
Я так делал что-бы раскодировать ucs2
Воображение важнее, чем знания. (Albert Einstein)

Последний раз редактировалось dmitriegorovih; 11.11.2010 в 18:23.
dmitriegorovih вне форума Ответить с цитированием
Старый 11.11.2010, 18:28   #23
xrob
Форумчанин
 
Регистрация: 18.10.2010
Сообщений: 419
По умолчанию

что такое ucs2?
xrob вне форума Ответить с цитированием
Старый 11.11.2010, 18:33   #24
dmitriegorovih
Ещё не
Форумчанин
 
Аватар для dmitriegorovih
 
Регистрация: 04.01.2010
Сообщений: 517
По умолчанию

Цитата:
что такое ucs2?
это кодировка смс
Воображение важнее, чем знания. (Albert Einstein)
dmitriegorovih вне форума Ответить с цитированием
Старый 12.11.2010, 18:08   #25
xrob
Форумчанин
 
Регистрация: 18.10.2010
Сообщений: 419
По умолчанию

я тут подумал, есть идея.

Код:
var
glasn,sogl,znak: string;

begin
glasn:='аеоуяиыАЕОИЫУЯЮ';
sogl:='рпнгкдбс';
znak:=';,.<>/^&*%$'

read(a);
if pos(a, glasn)<>0 then ...

end
по-моему самое оптимальное решение, а? =)
xrob вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Работа с текстом. J0n1cK Помощь студентам 1 30.05.2009 15:19
Работа с текстом. J0n1cK Паскаль, Turbo Pascal, PascalABC.NET 4 09.05.2009 00:29
работа с текстом... Poll Помощь студентам 5 23.01.2009 11:43
Работа с текстом vinimixer Общие вопросы Delphi 0 07.11.2008 21:19
Работа с текстом.[C] DropYourWeapon Общие вопросы C/C++ 3 15.10.2008 21:55