Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Массивы [D7, XP]

Страницы: < 1 2
Silica © (2006-02-02 16:51:00)
Дан такой код:

var i: integer;
a: array[1..11] of integer;
b,c,d,e: array[1..11] of byte;
str: string;
begin
for i:=0 to Memo1.Lines.Count-1 do
begin
a[i]:= strtoint(memo1.Lines[i]);
str:= memo1.Lines;
b[i+1]:= strtoint(str[i+1]);
str:= memo1.Lines;
c[i+1]:= strtoint(str[i+1]);
str:= memo1.Lines;
d[i+1]:= strtoint(str[i+1]);
str:= memo1.Lines;
e[i+1]:= strtoint(memo1.Lines[i+1]);
end;
end;

На форме расположено поле МЕМО. В свойстве LINES введены четырехзначные числа. Каждое число с новой строки. Нужно организовать массив в MEMO, и каждое число разбить на отдельные цифры, например, 4673 разбить на 4, 6, 7, 3. Представленный выше код выдает ошибку. Не знаю в чем проблема. Помогите, пожалуйста.

Silica (2006-02-02 17:34:00) [21]
Desdechado, можно и в другом.

Гошик Кувшинов, поменяла на 1, все равно какая то ошибка.

Гошик Кувшинов (2006-02-02 17:14:00) [22]
В первый раз у тебя i равна 0 и a[i] обращается к несуществующему индексу

Desdechado (2006-02-02 16:59:00) [23]
> массив в MEMO
не понял, что это

> Представленный выше код выдает ошибку
какую?

а "массив" обязательно в том же МЕМО, или в другом?

Страницы: < 1 2

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »