forum.boolean.name - Вылет среды

forum.boolean.name (http://forum.boolean.name/index.php)

- Основной форум (http://forum.boolean.name/forumdisplay.php?f=49)

- - Вылет среды (http://forum.boolean.name/showthread.php?t=16917)

Ответ: Вылет среды

Решил новую тему не создавать.
Вот в чем проблема сейчас: объявил переменные вначале программы, это 5 картинок, тип имейдж. Загрузил в процедуре переменные картинками. В следующей процедуре дравИмейдж эти картинки.
Но компилятор ругается на то что эти имена переменных не объявлены или не являются функциями. Пишет еще мол неправильное выражение- название переменной. Хотя переменные set,mini,panel и тому подобное, не думаю что это причина. И еще пишет что ожидалась точка, но найден бегин. На том месте точно все в порядке.
Подскажите пожалуйста.

Ответ: Вылет среды

Телепатирую...Код в студию, подскажем.

Ответ: Вылет среды

большой код.
___
просто назовите возможные причины. Может кто знает.

Ответ: Вылет среды

Ну вот назову причины которые пришли в голову: где то забыл поставить ";", не загрузил рисунки в ресурсы, при указании рисунка забыл обособить 'этим' или не указал расширение, ты указал тип контейнеров для картинок в процедуре(поэтому они доступны только ей, а в другой процедуре или главном потоке выдают ошибку). Кинь сюда кусок кода где ты объявлял переменные и где их используешь.

Ответ: Вылет среды

PHP код:


		
			
program Core3;

uses canvas,sensor;

var m1w,m1h,m2w,m2h:integer;

metod1,metod2,logostr:string;

open,mini,panel:image;



Procedure debug_space; forward;



Procedure sample; //приложение-пример для отладки

begin <<тут говорит что не знает таких переменных

drawimage(win,getwidth/2-120,getheight/2-130); drawtext('Окно программы',getwidth/2-90,getheight/2-120);

drawimage(mini,40,getheight-35);

repaint;

repeat

if (pointer_state<>0) and (pointer_pressed_x>70) and (pointer_pressed_x<110) and (pointer_pressed_y>getheight-35) and (pointer_pressed_y<getheight) then begin while pointer_state=1 do delay(1); debug_space; end;

until false;

end;



Procedure debug_loader; //загрузка режима отладки

begin

setcolor(255,255,255); fillrect(0,0,getwidth,getheight); repaint;

setFont(font_face_system,font_style_plain,font_size_small);

mini:=loadimage('/mini.png'); panel:=loadimage('/panel.png'); open:=loadimage('/open.png');

set:=loadimage('/set.png'); win:=loadimage('/window.png');

debug_space;

end;

Ответ: Вылет среды

Ты указал программе, что процедура "debug_space" будет описана дальше, но описания этой процедуры я не увидел, может поэтому ругается?

Ответ: Вылет среды

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

Ответ: Вылет среды

PHP код:


		
			
var m1w,m1h,m2w,m2h:integer; 

metod1,metod2,logostr:string; 

open,mini,panel:image;

В строке с типом имейдж пишет что ожидался оператор [имя] переменной

Ответ: Вылет среды

Решено! Причина: нельзя использовать название переменной 'set'. Исправил на 'seti' и все заработало. Спасибо AntiRock за подсказки.