Форум: "Начинающим";
Текущий архив: 2009.05.03;
Скачать: [xml.tar.bz2];
ВнизКак правильно создать оператор проверки? Найти похожие ветки
← →
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....
← →
{RASkov} © (2009-03-20 12:02) [57]> [53] IIIakal (20.03.09 11:54)
Это прикол или ты действительно двоешник? :)
← →
IIIakal (2009-03-20 12:02) [58]
> ЮЮ
Спасибо бАльшущее)))
← →
IIIakal (2009-03-20 12:04) [59]
> Это прикол или ты действительно двоешник? :)
я просто только что причитал главу про циклы, закрепляю на практике)))))
← →
Сергей М. © (2009-03-20 12:06) [60]
> 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] только узнал про циклы....))))
ну я же только учусь....
← →
Игорь Шевченко © (2009-03-20 13:12) [62]
> ну я же только учусь....
Вот и учись.
Страницы: 1 2 вся ветка
Форум: "Начинающим";
Текущий архив: 2009.05.03;
Скачать: [xml.tar.bz2];
Память: 0.57 MB
Время: 0.007 c