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

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

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

Ответ
 
Опции темы
Старый 30.03.2010, 20:29   #1
im_zorg
Знающий
 
Регистрация: 25.10.2009
Сообщений: 338
Написано 53 полезных сообщений
(для 61 пользователей)
Ещё вопрос...

Можно ли сделать так чтоб из map.txt брал цифру от "," до "," типо
,1,2,3,
,11,12,22,
и т.д.?
Вот как я загружаю карту
123
123
123
procedure LoadMap;
begin
  res
:=OpenResource('/map.txt');
  for 
:= 0 to mapSize do 
  
begin
    line 
:= ReadLine(res);
    for 
:= 0 to mapSize do
    
map[x,y] := StringToInteger(GetChar(line,x));
  
end;
  
CloseResource(res);
end
А то 10 tile'ов это мало, для подобии perfectworld.
(Offline)
 
Ответить с цитированием
Старый 30.03.2010, 21:50   #2
cherepets
Бывалый
 
Регистрация: 18.08.2009
Сообщений: 745
Написано 146 полезных сообщений
(для 215 пользователей)
Ответ: Ещё вопрос...

подсказка: можно использовать еще и буквы (если конечно в двиге к этим цифрам ниче особого не привязано.

а так, можешь читать во временную переменную и добавлять в массив только если попалась не запятая
(Offline)
 
Ответить с цитированием
Старый 30.03.2010, 22:15   #3
DIMMON4IK
Знающий
 
Аватар для DIMMON4IK
 
Регистрация: 21.07.2009
Адрес: Украина
Сообщений: 219
Написано 44 полезных сообщений
(для 78 пользователей)
Ответ: Ещё вопрос...

lib_parse
__________________


(Offline)
 
Ответить с цитированием
Старый 31.03.2010, 12:08   #4
im_zorg
Знающий
 
Регистрация: 25.10.2009
Сообщений: 338
Написано 53 полезных сообщений
(для 61 пользователей)
Ответ: Ещё вопрос...

Сообщение от DIMMON4IK Посмотреть сообщение
lib_parse
,
и чем она поможет?? это всё таки карта а не просто текст))
(Offline)
 
Ответить с цитированием
Старый 31.03.2010, 16:19   #5
odd
Мастер
 
Аватар для odd
 
Регистрация: 06.09.2007
Адрес: Донецк, ДНР
Сообщений: 1,023
Написано 298 полезных сообщений
(для 713 пользователей)
Ответ: Ещё вопрос...

Сообщение от im_zorg Посмотреть сообщение
,
и чем она поможет?? это всё таки карта а не просто текст))
Считываешь весь текст целиком и потом ничего вырезать и не надо. Библиотека всё аккуратно вырежет сама.
(Offline)
 
Ответить с цитированием
Старый 31.03.2010, 17:17   #6
im_zorg
Знающий
 
Регистрация: 25.10.2009
Сообщений: 338
Написано 53 полезных сообщений
(для 61 пользователей)
Ответ: Ещё вопрос...

кинь пример
(Offline)
 
Ответить с цитированием
Старый 31.03.2010, 18:55   #7
odd
Мастер
 
Аватар для odd
 
Регистрация: 06.09.2007
Адрес: Донецк, ДНР
Сообщений: 1,023
Написано 298 полезных сообщений
(для 713 пользователей)
Ответ: Ещё вопрос...

Сообщение от im_zorg Посмотреть сообщение
кинь пример
Program ParseTest;
Uses parseresloader;
Var     
sstring;
        
iinteger;
Begin
    s
:=LoadText('test.txt');
    
debug(s);
    
parse.line(s',');
    for 
i:=0 to parse.len-do DrawText(parse.get(i), 5i15 5);
    
Repaint;    
    
Delay(5000);
End
В файле test.txt было такое содержимое:
1234777
### 
(Offline)
 
Ответить с цитированием
Старый 08.04.2010, 11:10   #8
im_zorg
Знающий
 
Регистрация: 25.10.2009
Сообщений: 338
Написано 53 полезных сообщений
(для 61 пользователей)
Ответ: Ещё вопрос...

Напиши пример загрузки карты
(Offline)
 
Ответить с цитированием
Ответ


Опции темы

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

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


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


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