Как правильно создать оператор проверки?

← →
Anatoly Podgoretsky © (2009-03-19 14:41) [40]

Зря ты это с программированием связался, не твое это.

← →
IIIakal (2009-03-19 14:45) [41]

> Зря ты это с программированием связался, не твое это.

Ну да, такие советы проще всего давать.....

← →
Anatoly Podgoretsky © (2009-03-19 14:53) [42]

> IIIakal (19.03.2009 14:45:41) [41]

Других дать нельзя, ты вообще должен на меня молиться, столько времени удастся съэкомить, не будет жалко бесцельно прожитых лет, лучше дворником.

← →
IIIakal (2009-03-19 14:59) [43]

а ты считаешь, что дворником работать - не бесцельно проживешь?
мести от забора до обеда....

← →
Медвежонок Пятачок © (2009-03-19 15:39) [44]

а как и где она объявляется?

перед бегином объявляется.

если в массиве лежат лопаты, то переменная должна быть типа "метла"

если в массиве метлы, то переменная должна быть типа "лопата"

← →
IIIakal (2009-03-19 16:12) [45]

))))))))))))))

← →
Anatoly Podgoretsky © (2009-03-19 16:14) [46]

Ну если

> мести от забора до обеда....

то тебе прямой путь в олигархи.

← →
IIIakal (2009-03-19 16:19) [47]

> то тебе прямой путь в олигархи.

нет уж, спасибо...
я и так не плохо устроился....дворик у меня небольшой, метла хорошая, новая...:-\

← →
IIIakal (2009-03-20 11:34) [48]

Блин, народ, ну объясните дураку пожалуйста, почему не работает цикл

var s, k:array[1..10] of integer; slot: array[1..10] of TBevel; p, i: integer; begin "Присвоение значений массивам S, K"; p:=0; for i:=1 to 10 do begin p:=p+1; if s[p]>0 then slot[p].Visible:=true; end; end;
компилируется, но при выполнение этого кода вылетает....

← →
Сергей М. © (2009-03-20 11:37) [49]

> при выполнение этого кода вылетает

Кто, куда и каким рейсом ?

← →
IIIakal (2009-03-20 11:41) [50]

> Кто, куда и каким рейсом ?

Системное сообщение:
Access violation at addres 00443303 in module "Project1.exe". Read of address00000057.

← →
ЮЮ © (2009-03-20 11:41) [51]

в AV, прямым рейсом.
Ведь все его массивы заполнены nil-ами. Про то, что надо
slot[1] := Slot1; ...
никто не сказал :)

← →
Сергей М. © (2009-03-20 11:45) [52]

> IIIakal (20.03.09 11:41) [50]

С первого раза выговорить эту абракадабру, наверно, не получилось ?)

см. [51]

← →
IIIakal (2009-03-20 11:54) [53]

спс вот так
p:=0; for i:=1 to 10 do begin p:=p+1; if s[i]>0 then slot[1]:=slot1; slot[2]:=slot2; slot[3]:=slot3; slot[4]:=slot4; slot[5]:=slot5; slot[6]:=slot6; slot[7]:=slot7; slot[8]:=slot8; slot[9]:=slot9; slot[10]:=slot10; slot[p].Visible:=true;
но почему то не работает оператор if, все 10 slot:=true

← →
Сергей М. © (2009-03-20 11:56) [54]

> почему то не работает оператор if

Это он тебе сам сказал, что не он работает ?

← →
ЮЮ © (2009-03-20 11:59) [55]

пжлст, всё не так

slot[1]:=slot1;
slot[2]:=slot2;
slot[3]:=slot3;
slot[4]:=slot4;
slot[5]:=slot5;
slot[6]:=slot6;
slot[7]:=slot7;
slot[8]:=slot8;
slot[9]:=slot9;
slot[10]:=slot10;

for i:=1 to 10 do
begin
slot[i].Visible:=s[i]>0;
end

← →
IIIakal (2009-03-20 12:00) [56]

> Это он тебе сам сказал, что не он работает ?

нет...значения массива только первых 5>0 , остальные 0, а значение visible:=true присваивается всем 10....

> [53] IIIakal (20.03.09 11:54)

Это прикол или ты действительно двоешник? :)

← →
IIIakal (2009-03-20 12:02) [58]

> ЮЮ

Спасибо бАльшущее)))

← →
IIIakal (2009-03-20 12:04) [59]

> Это прикол или ты действительно двоешник? :)

я просто только что причитал главу про циклы, закрепляю на практике)))))

> IIIakal (20.03.09 12:04) [59]

> только что причитал главу про циклы

Только что ?!

Ты всегда сначала что-то делаешь, а потом читаешь про то как надо или как не надо было делать ?

← →
IIIakal (2009-03-20 12:15) [61]

> Ты всегда сначала что-то делаешь, а потом читаешь про то
> как надо или как не надо было делать ?

не я просто сначала делал так

if s1>0 then begin
slot1.Visible:=true;
end
else if s2>0 then begin
slot2.Visible:=true;
end
else if s3>0 then begin
slot3.Visible:=true;

Но после сообщения [12] только узнал про циклы....))))
ну я же только учусь....

> ну я же только учусь....

Вот и учись.

Как правильно создать оператор проверки? Найти похожие ветки