Pascal / Delphi

[queyron]

@Mister Svin 
Создать функцию инкремента?

function MyInc(var i: integer): integer;
begin
  inc(i);
  Result:=i;
end;

 

[Mister Svin]

тока переменная от этого не изменится. в данном случае как параметр передаётся копия i на стеке.

короче, надо применить сишный приём - в эту

MyInc

передавать i по ссылке как указатель, чтобы её можно было изменить.

[Mister Svin]

Delphi позволяет также передавать параметры в функции или процедуры по ссылке - такие параметры называются параметрами-переменными. Передача параметра по ссылке означает, что функция или процедура сможет изменить полученные значения параметров. Для передачи параметров по ссылке используется ключевое слово var, помещаемое в список параметров вызываемой процедуры или функции.

procedure ChangeMe( var x: longint );

begin

x := 2; // Параметр х изменен зызванной процедурой

end;

Вместо создания копии переменной x, ключевое слово var требует передачи адреса самой переменной x, что позволяет процедуре непосредственно изменять ее значение.

[Mister Svin]

Ах ты рыбий глаз ! (с)

У тебя уже написано VAR !!!

 

 

Только не пояснено как это работает !

[LITR]

Нихрена не понял о чем вообще речь в вопросе.

[Mister Svin]

В 16.10.2018 в 12:01, Recruit2 сказал:

 Имеется запрос типа  760 AA 00 02 21 XX нужно следующее

 

Что непонятно ?

[LITR]

слово запрос, по мне, ассоциируется с SQL.  

[Recruit2]

Спасибо всем кто откликнулся, оказывается все просто)))) до безумия...вот я сразу и не до петрил))))

объявляется глобальная переменная вот и все))) а далее твори чего хошь ))) 

 

АА:=AA+1;

Изменено 22 октября, 2018 пользователем Recruit2

[Watashi]

Я правильно понимаю? Народ обсуждает Делфи в 2018м?

[Internal]

20 часов назад, Watashi сказал:

Я правильно понимаю? Народ обсуждает Делфи в 2018м?

сам в шоке:) чуть не подавился)