31.03.2012, 00:11
|
 |
Специалист
|
|
Регистрация: 09.10.2010
Адрес: Тольятти
Сообщения: 803
Версия Delphi: Delphi 7
Репутация: 2064
|
|
Код:
var
m:array[0..9] of TM;
...
procedure(var X : Integer; Num : Integer);
begin
X := X + Num;
end;
...
GAVGAV(m[1].A, 5);
разве нет? |