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

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

Вернуться   forum.boolean.name > Программирование игр для мобильных телефонов > MidletPascal > Проекты на MidletPascal

Ответ
 
Опции темы
Старый 27.03.2011, 21:46   #1
kizup
Нуждающийся
 
Аватар для kizup
 
Регистрация: 12.12.2010
Адрес: SaratoF
Сообщений: 85
Написано 5 полезных сообщений
(для 5 пользователей)
TV_programm

Если вам лень вставать с дивана, а очень хочется посмотреть что будет по ящику, то эта программа как раз то что вам нужно! Очень простой интерфейс, список из 12 каналов....
Вложения
Тип файла: rar bin.rar (42.7 Кб, 522 просмотров)
__________________
(Offline)
 
Ответить с цитированием
Старый 27.03.2011, 21:49   #2
Igor
Мастер
 
Аватар для Igor
 
Регистрация: 03.05.2010
Адрес: Подмосковье
Сообщений: 1,218
Написано 438 полезных сообщений
(для 790 пользователей)
Ответ: TV_programm

Нет пробелов в списке того что будет между словами и временем.
Сделай, чтобы он добавлялся если за буквой следует цифра и наоборот
__________________
О¯О ¡¡¡ʁɔvʎнdǝʚǝdǝu dиW
(Offline)
 
Ответить с цитированием
Старый 27.03.2011, 22:05   #3
kizup
Нуждающийся
 
Аватар для kizup
 
Регистрация: 12.12.2010
Адрес: SaratoF
Сообщений: 85
Написано 5 полезных сообщений
(для 5 пользователей)
Ответ: TV_programm

Я пока что парсить строки так не умею, не подскажешь как лучше это сделать? Надо как то посимвольно строку разбивать? Или чтото другое?
__________________
(Offline)
 
Ответить с цитированием
Старый 27.03.2011, 22:18   #4
Igor
Мастер
 
Аватар для Igor
 
Регистрация: 03.05.2010
Адрес: Подмосковье
Сообщений: 1,218
Написано 438 полезных сообщений
(для 790 пользователей)
Ответ: TV_programm

s:string;
i:integer;
x1,x2:boolean;
function ifcifra(s[i]):boolean;
Функцию придётся писать самому, возвращает true если параметр-char является цифрой.
if ((s<>'') and( lenght(s)>2)) then
begin
i:=1;
repeat
//если один символ цифра, а второй - нет, или наоборот
if (ifcifra(s[i]) xor ifcifra(s[i+1])) then
begin
добавляем пробел между i и (i+1);
//не помню как с текстом работать
i:=i+1;
end;
i:=i+1;
until i=>lenght(s-1);
end;
P.S. как работает не проверял
__________________
О¯О ¡¡¡ʁɔvʎнdǝʚǝdǝu dиW
(Offline)
 
Ответить с цитированием
Старый 27.03.2011, 22:54   #5
kizup
Нуждающийся
 
Аватар для kizup
 
Регистрация: 12.12.2010
Адрес: SaratoF
Сообщений: 85
Написано 5 полезных сообщений
(для 5 пользователей)
Ответ: TV_programm

Тут ещё вот в чем дело, либа parse разбивает строку html, которую я получаю по - разному, где-то получается так что чисто цифры идут, где-то чисто строка, а где-то вперемешку. И вот как раз таки с третьим вариантом самая беда
__________________
(Offline)
 
Ответить с цитированием
Старый 28.03.2011, 00:22   #6
ViNT
Модератор
 
Регистрация: 03.04.2007
Сообщений: 2,252
Написано 597 полезных сообщений
(для 817 пользователей)
Ответ: TV_programm

Раз Lib_parse дает неудовлетворительный результат, лучше самому написать парсер, заточенный под данный случай.
(Offline)
 
Ответить с цитированием
Ответ


Опции темы

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.


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


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