Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Общие вопросы > Передача процедури ссылку на переменную

Автор: clever 18.12.2003, 13:07

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

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

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

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

Автор: <Spawn> 18.12.2003, 14:14

Код

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

Автор: Seti 18.12.2003, 16:26

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

Код


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