[FONT=Courier New]program RecordDemo;
uses crt;[/FONT]
[FONT=Courier New]type Person = record
Name, Surname : string;
Age : byte;
OtherInfo: array[0..15] of string;
end;[/FONT]
[FONT=Courier New]type PPerson = ^Person;[/FONT]
[FONT=Courier New]var pDemo : PPerson;
nBinary: longint absolute pDemo;
begin
New(pDemo); [COLOR=navy]{выделяем память под указатель}
[/COLOR] PPerson(pDemo)^.Name := [COLOR=blue]'Noname'[/COLOR]; {[COLOR=navy]разыменовываем указатель и получаем доступ к полям записи}
[/COLOR] writeln(nBinary); [COLOR=navy]{выводим адрес записи pDemo}[/COLOR]
Dispose(pDemo); [COLOR=navy]{освобождаем память}[/COLOR]
end.[/FONT]
Структуры
в справке по паскалю нет такого понятия.
Каким способом объеденить несколько типов данных в одну группу и чтоб обращаться к ним по одной ссылке? Например как в си
Каким способом объеденить несколько типов данных в одну группу и чтоб обращаться к ним по одной ссылке? Например как в си
record насколько я помню. Правда не писал на нем уже лет 7 ))
А все сотальное так же как на C например.
А все сотальное так же как на C например.
Структуры структурами называются в си, а в других языках записями(records)
В других языках подобные типы данных совсем не обязательно называются записями, в C#, например, это вообще "значимый тип", т.е. valuetype.
Я имел в виду не си-подобные языки