|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
||||
|
||||
инициализация массиива
Код:
type TZombi = record liv : Boolean; distanse: real; poyavlenie: integer; end; var m: array of TZombi; Код:
for i:=1 to zomb do begin if i<>zomb then m[i].poyavlenie:=StrToInt(copy(moment,1,pos(' ',moment)-1)) else m[i].poyavlenie:=StrToInt(moment); m[i].liv:=true; m[i].distanse:=10.5; moment:=copy(moment,pos(' ',moment)+1,length(moment)); end; ругается [Warning] conprg.dpr(32): Variable 'm' might not have been initialized какая еще инициализация? пишу консольную программу раньше с оконной такого не было Последний раз редактировалось ALexandr555, 01.12.2011 в 11:58. |
#2
|
||||
|
||||
Да дело не в консоли, ты длину массиву m не задал однако.
Некоторые программисты настолько ленивы, что сразу пишут рабочий код. Если вас наказали ни за что - радуйтесь: вы ни в чем не виноваты. |
#3
|
||||
|
||||
Перед циклом добавьте строчку:
Код:
SetLength(m, zomb); Код:
for i:=0 to zomb-1 do Жизнь такова какова она есть и больше никакова. Помогаю за спасибо. |