Все изображения одним файлом

Новые сообщения Правила форума Поиск

Страница 1 из 1 1
Модератор форума: ADMIN, Nextik

06.05.2011 в 22:55 Сообщение #1

ratum

Новичок

Проверенные

Сообщений: 14

Награды: 0

Репутация: 0

Offline

Как использовать один сборное изображение вместо кучи отдельных?

Вопрос вдогонку smile :
if (enmx<4) and (enmy<4) then begin
fillSolid; Pathfinding; ens1(enx[z],eny[z]);
end;
Функция ens1 компилится с ошибкой (функция не может быть вызвана отсюда). При этом сама функция компилится нормально. В чём проблема? Раньше никогда функции не использовал smile

07.05.2011 в 09:10 Сообщение #2

121212

Программист

Проверенные

Сообщений: 268

Награды: 7

Репутация: 14

Offline

добавь функцию ens1 в forward;
Пример:
programm test;
var
i:integer;
function ens1(x,y:integer);forward;//теперь функцию можно вызывать из любого места в коде

function ens1(x,y:integer):integer;
begin
ens1:=x+y;
end;

begin
i:=ens1(12,23);
drawtext(''+i,0,0);
repaint;
delay(5000);
end.

Сообщение отредактировал 121212 - Суббота, 07.05.2011, 09:14

07.05.2011 в 09:13 Сообщение #3

121212

Программист

Проверенные

Сообщений: 268

Награды: 7

Репутация: 14

Offline

И вообще куда функция у тебя свое значение возвращает? в моем примере i:=ens1 у тебя просто ens1, исправь... добавь ее в forward и радуйся)))

07.05.2011 в 14:09 Сообщение #4

ratum

Новичок

Проверенные

Сообщений: 14

Награды: 0

Репутация: 0

Offline

Спасибо)
Функция булевая. Определяет видит ли моб ирока или нет.

07.05.2011 в 21:59 Сообщение #5

ratum

Новичок

Проверенные

Сообщений: 14

Награды: 0

Репутация: 0

Offline

Проблема решена. Нашел imagefromimage.

Сообщение отредактировал ratum - Воскресенье, 08.05.2011, 18:39

04.07.2011 в 15:28 Сообщение #6

pass

Удаленные

Можно исползовать либу lib_vault

04.07.2011 в 16:05 Сообщение #7

Nextik

Программист

Проверенные

Сообщений: 273

Награды: 0

Репутация: 42

Offline

pass, может не видно или что то ещё но написано же что проблема решена)))

Все изображения одним файлом

Страница 1 из 1
1