| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Редактор карт в DelphiX [Delphi, DelphiX, Windows]
Аццкий_рыцарь:) © (2006-01-24 01:15:00)я наверное уже задолбал вас со своими тупыми и ламерскими вопросами :)
вот вопрос :)
Расскажите мне плиз как создавать редактор карт в DelphiX. Тоесть, как делается так что потом карта сохраняется в отдельный файл, а потом загружается?
Cash (2006-02-28 15:53:00) [1]С небольшим опозданием примерно в месяц, наконец даю эту процедурку
долбанную:
Procedure SaveToStream(Stream: TStream);
var
i,j: integer;
begin
Stream.Write(Map.Width,4); // пишем ширину сетки карты
Stream.Write(Map.Height,4); // пишим высоту соответственно
Stream.Write(DxSpriteEngine1.Engine.Count,4); // говорим, сколько объектов на карте
// теперь пишим сетку поэлементно
for j:=0 to Map.Height-1 do begin
for i:=0 to Map.Width-1 do begin
Stream.Write(Map.Chips[i,j],4);
end;
end;
// а после сетки записываем поэлементно все объекты с карты
for i:=0 to DxSpriteEngine1.Engine.Count-1 do begin
Stream.Write(TObjectDo(DxSpriteEngine1.Engine.Items[i]). xobj,4);
Stream.Write(TObjectDo(DxSpriteEngine1.Engine.Items[i]). yobj,4);
Stream.Write(TObjectDo(DxSpriteEngine1.Engine.Items[i]). questprogress,4);
Stream.Write(TObjectDo(DxSpriteEngine1.Engine.Items[i]). isclickable,1);
end;
end;
Вопрос на засыпку! Как использовать эту процедуру для сохранения карты
в файл?
Поцедура считывания такая же, за исключением замены Write на Read, и
еще, для TSream.Read нельзя использовать поля классов, при таком
раскладе наджо использовать буффер того же типа, что и поле класса.
То есть сперва TStream.Read(T,n);, а потом Variable.Value:=T;.
Вот так!
И это... не пытайся эту процедуру имплементировать в прогу, ничего из
этого не выйдет. Осмотри ее, это наглядный и живучий пример из серии:
"Как сделать ...", это должно дать наводку на написание своей
процедурки. ;)
Аццкий_рыцарь:) (2006-02-25 15:08:00) [2]XProger :)
XProger (2006-02-24 01:37:00) [3]Аццкий_рыцарь:), дык мы тут живём ;)
Аццкий_рыцарь:) (2006-02-24 00:30:00) [4]Здарова всем :) вы меня еще не забыли? :) я скоро продолжу тему, главное не удаляйте. Просто времени нет :(((
XProger (2006-02-09 11:38:00) [5]http://extractor.ru
Cash (2006-02-09 11:21:00) [6]Аццкий_рыцарь:) (08.02.06 20:32) [105]:
Нет, но с помощью Delphi можно раздербанить ихние ресурсы! ;)
Аццкий_рыцарь:) (2006-02-08 20:32:00) [7]и еще...
Генералы разве написаны на Дельфях ? О_о
Аццкий_рыцарь:) (2006-02-08 20:31:00) [8]блина генералов нима :( пойду искать завтра у других знакомых.
кстати, ты был прав, что я не все пойму
Cash (2006-02-08 18:26:00) [9]Ну что, поставил? Поставь себе еще HEX редактор, а потом посмотри сюда:
http://www.projectcl.h15.ru/files/bigfiles.htm
На то, что ты все поймешь я и не надеюсь, отписал я етот док уже очень
давно, а сейчас перечитал и ничего не понял :). В любом случае погодя я
поясню некоторые вещи, которые согут быть непонятными.
Аццкий_рыцарь:) (2006-02-07 10:46:00) [10]Сегодняпосле учебы зайду к одному "типу", у него генералы должны быть
Cash (2006-02-07 08:12:00) [11]Аццкий_рыцарь:) (07.02.06 01:24) [99]:
Тьфу, блин, не 3.3, а 3.11, вот от сюда: http://www.bpsoft.com/downloads/
На счет их, я их не вскрывал, так что не знаю как там дела делаются.
Вон, читаю со своих ломалок на винте:
"Солдаты анархии"
"EVE OnLine" - http://www.eve-ru.com
"Аллоды" 1/2
"C&C Generals"/"The Lord of the ring: Battle of the MiddleEarth"
"Transport Tycoon Deluxe" - http://goldgames.times.lv/ttd/download.html
Но Генералы предпочитительнее всех.
XProger (2006-02-07 07:33:00) [12]Аццкий_рыцарь:), ну эта, как его там... OpenGL + Win API - во! :)
Аццкий_рыцарь:) (2006-02-07 01:24:00) [13]Там только есть 4.23 и 4.2 версии :( а что бы еще сгодилось? а то такого нет :( Lineage 2 не покатит? или дум или гта?
XProger эйта ты на чем сделал, что не глючит? АПИ?
Cash (2006-02-06 21:31:00) [14]Аццкий_рыцарь:) (06.02.06 17:17) [96]:
Надыбай, поставь, заведи себе HEX редактор,
а я дам почву для размышлений о форматах.
(Мой любимый редактор лежит на http://www.bpsoft.com,
скачай от туда версию 3.3, а я таблеткой обеспечу.
Вещичка мощнейшая, умеет даже очень много)
Кроме того сгодились бы Аллоды 1 и 2, а еще
моя люимица: EVE OnLine, я просто покажу как
узнавать форматы файлов и создавать их.
XProger © (06.02.06 17:27) [97]:
Опять ты "Тиранус" взялся за свои проделки! :)))
XProger (2006-02-06 17:27:00) [15]Аццкий_рыцарь:):
http://timeforkill.mirgames.ru/img/scr/5.jpg
http://timeforkill.mirgames.ru/img/scr/6.jpg
http://timeforkill.mirgames.ru/img/scr/7.jpg
Представь себе - не глючит! :)
Переходи на тёмную сторону силы - API ;)
Аццкий_рыцарь:) (2006-02-06 17:17:00) [16]давненько играл :) ужо нет :((( а что?
Cash (2006-02-06 16:00:00) [17]Слушай Аццкий_рыцарь:), а у тебя C&C Generals (ZH) есть?
Cash (2006-02-06 15:31:00) [18]Я, здесь. Просто со своими лагами пока разбираюсь.
Аццкий_рыцарь:) (2006-02-06 11:24:00) [19]Cash, ты де? :)
Аццкий_рыцарь:) (2006-02-04 23:10:00) [20]Кстати, маленький вопросик: как сделать, чтоб в DelphiX картинка спрайта не растягмвалась на всю ширину и длинну спрайта? у неё нет никакого свойства, типа Stretch:(
| |
Страницы: 