Массивы

← →
Revan (2006-03-28 13:01) [0]

Здравствуйте! У меня такой вопрос, вернее такой кусок программы который должен работать, но увы... Происходит проверка главной диоганали, она должна быть упорядочена. Помогите, пожалуйста...

For i:=0 to StringGrid1.ColCount-1 do For j:=0 to StringGrid1.RowCount-1 do Begin if (i<>StringGrid1.ColCount-1) and (j=i) and (StringGrid1.Cells[i,j]<StringGrid1.Cells[i+1,i+1]) then inc(bol); end; if bol=StringGrid1.ColCount-1 then Edit2.Text:="Упорядочен" else Edit2.Text := "Не упорядочен"; end;

← →
Ega23 © (2006-03-28 13:09) [1]

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

(StringGrid1.Cells[i,j]<StringGrid1.Cells[i+1,j+1]

?

А тебе точно строки надо сравнивать?
И зачем цикл по по всем элементам?

Массивы Найти похожие ветки