VPF::Передача процедури ссылку на переменную

clever

Дата 18.12.2003, 13:07 (ссылка)

(голосов: 0)

Загрузка ...

Unregistered

Как передать процедуре не переменную, а ссфлку на неё, чтобы процедура могла изменять не её копию, а глобадьную переменную?

Пример:
var a:integer;

procedure int(n:integer);
begin
n:=n+1;
end;

begin
int(a);
{Теперь а должно быть на 1 больше, а не оставаться прежней}
end.

<Spawn>

Дата 18.12.2003, 14:14 (ссылка)

(нет голосов)

Загрузка ...

Око кары:)

Профиль
Группа: Экс. модератор
Сообщений: 2776
Регистрация: 29.1.2003
Где: Екатеринбург

Репутация: 44
Всего: 64

Код

procedure int(var n:integer);
begin
n:=n+1;
end;

--------------------

"Для некоторых людей программирование является такой же внутренней потребностью, подобно тому, как коровы дают молоко, или писатели стремятся писать" - Николай Безруков.

Seti

Дата 18.12.2003, 16:26 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 62
Регистрация: 4.12.2003

Репутация: 1
Всего: 1

а если ты не планируешь изменять значение переменной, то хорошим тоном будет считаться

Код


procedure int(const n:integer);
begin
  //код
end;

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Общие вопросы \| Следующая тема »