pascalabcnet/InstallerSamples/!MainFeatures/01_First/Amp.pas

12 lines
380 B
ObjectPascal
Raw Permalink Normal View History

2019-07-27 10:57:54 +03:00
// Пример иллюстрирует использование знака "&" для снятия атрибута ключевого слова
2019-07-17 22:16:11 +03:00
var
2022-10-19 16:20:05 +03:00
&begin,&end: integer;
i: integer;
2019-07-17 22:16:11 +03:00
begin
&begin := 1;
&end := 2;
var t: System.Type := &begin.GetType; // в System.Type использовать & не надо
write(&begin,' ',&end,' ',t);
2015-05-14 22:35:07 +03:00
end.