|
Вопрос # 6 001/ вопрос решён / |
|
Здравствуйте!
Помогите, пожалуйста разобраться с вызовом ф-ции.
В параметр передаю двумерный массив типа:
TArr = array of array of Word;
Сам массив объявлен как:
matr: array of array of Word;
Ф-ция возвращает число Word.
Теперь при присвоении ф-ции полю:
edtValue.Text:=IntToStr(getValue(matr));
выбивает ошибка:
[Error] Unit1.pas(214): Incompatible types
К вопросу прикреплён файл. Загрузить » (срок хранения: 60 дней с момента отправки вопроса)
Приложение: Переключить в обычный режим- function getValue(mas: TArr): Word;
- var i,j: Byte;
- min, value: Word;
- begin
- with Form1 do
- begin
- value := 0;
- for i:=0 to High(mas) do
- begin
- min := MAXWORD;
- for j := 0 to High(mas[i]) do
- begin
- if matr[i,j] < min then
- min := matr[i,j];
- end;
- for j := 0 to High(mas[i]) do
- begin
- matr[i,j]:= matr[i,j]-min;
- end;
- value := value + min;
- end;
- for j:=0 to High(mas) do
- begin
- min := MAXWORD;
- for i := 0 to High(mas[j]) do
- begin
- if matr[i,j] < min then
- min := matr[i,j];
- end;
- value := value + min;
- end;
- Result:=value;
- end;
- end;
 |
Вопрос задал: disillusion (статус: Посетитель)
Вопрос отправлен: 15 марта 2012, 01:06
Состояние вопроса: решён, ответов: 1.
|
Ответ #1. Отвечает эксперт: min@y™
Просто сделай:
matr: TArr; // в умных книжках по паскалю написано, почему так
 |
Ответ отправил: min@y™ (статус: Доктор наук)
Время отправки: 15 марта 2012, 08:25
Оценка за ответ: 5
Комментарий к оценке: спасибо!
как все очевидно =)
сглупил я)
|
Мини-форум вопроса
Всего сообщений: 1; последнее сообщение — 15 марта 2012, 14:51; участников в обсуждении: 1.
|
bugmenot (статус: 3-ий класс), 15 марта 2012, 14:51 [#1]:
Цитата (disillusion):
выбивает ошибка
А таблица выскакивает? 
виконання програми розпочинається з того самого мiсця, де призупинилося.
|
15 марта 2012, 16:37: Статус вопроса изменён на решённый (изменил модератор Ерёмин А.А.)
Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.
|
