[areen666]

прошу помощи! задали написать игру. выбрал лабиринт. но проблема в том, что не знаю как это сделать через массив. то есть проставил все значения, где 1 там стена, где 0 - проход. но как сделать так, чтобы персонаж не проходил через стены? и как мне вывести этот лабиринт, чтобы я его смог увидеть и сделать под него графику? пытался через ListView и StringGrid - не выходит…

[lmikle]

И чего не выходит?
Просто вывести, что бы посмотреть:

Код:

1 2 3 4 5 6 7 8 9 10 11

var   Labirinth : Array [0..9,0..9] Of Integer; // 10x10 ...   var   I ,J : Integer; begin   For I := 0 To 9 Do     For J := 0 To 9 Do       StringGrid1.Cells[I,J] := Labirinth[I,J]; end;

Но это просто посмотреть. С выводим что бы было красиво - надо выводить (рисовать) либо на TImage, либо на TPaintBox...

[Vladimr]

Готовый вариант работы программы по вашему запросу.