absolute

[Izhic]

пожалуйста уточните как работает абсолют. Это директива из Паскаля.
Кстати прочёл что она устарела. Как её написать в Дельфи иначе?
Указателями или как...

[BOBAH13]

смотря что требуется... в object pascal она поддерживается... можно разумеется ее инициализировать как к примеру:

var
  i: Integer;
  bar: array of Byte;
begin
  Pointer(bar) := @i;
  ..

или просто

var
  i: Integer;
  b: array[0..3] of Byte absolute i;
...

[Izhic]

т.е. в данном случае в массиве окажется 4 байта 32битного int'а...
Спасибо BOBAH13, вроде понял. Хороший пример

Нужно 1ым способом...
Пишет
Error: "Invalid TypeCast"
Хотя при absolute у меня сразу работало.

[Stilet]

Можно так:

var
  i: Integer;
  bar: array[1..4] of Byte;
begin
  move(i,bar,4);
end;

или так:

type tbar=array[1..4] of byte;
var
  i: Integer;
  bar: tbar;
begin
  bar:=tbar(i);
end;

[BOBAH13]

Stilet вы путаите смысл данной операции... Вы копируите данные... а смысл absolute в том что если менять любое значение в одной из переменных то оно меняется и в другой т.к. они обе указывают на один и тот же адресс просто процессор работает с ними по разному.

Теперь поясню разницу array[0..3] of и array of... если объявить статистически [0..3] то дельфи без дерективы absolute резервирует в сегменте данных 4 байта... и адрес объвялянной переменной указывает именно на 1й байт этих данных... если же вы объявляите динамически то резервируется ( что наверняка ) 4 байта - адресс... и так.. когда мы пишем @i это значит что мы указываем адресс на данные i - 4 байта как Integer... и тут процессор понимает что раз объявлено array of byte мы можеш обращаться к данным по адрессу ( т.е. к данным I: Integer) по байтно вот и вся фишка... а absolute всеголиш говори дельфи что эти данные будут указывать на адресс начала данных I: Integer и работать с ними как array[0..3] of Byte

на правильность всего выше сказанного 100% дать не могу т.к. не в курсе как дельфи транслирует в асм

p.s. предъявите код оформим вашу absolute первым способом ))

[Роман Радер]

хм... я видел что такое есть, но ни разу не понадобилось.. можно привести практический пример где оно надо? ну не приходит на ум ничего...

[Баламут]

Можно так еще

type TMyInt = record
case integer of
    0: (i: integer);
    1: (a: byte; b: byte; c: byte; d: byte);
end;

Сообщение от Роман Радер

хм... я видел что такое есть, но ни разу не понадобилось.. можно привести практический пример где оно надо? ну не приходит на ум ничего...

Я, например, пользуюсь подобным для перебора диапазона айпишников. Так гораздо удобнее, чем постоянно вызывать StrToInt

[Beweniy_pchel]

Сообщение от Баламут

Можно так еще

type TMyInt = record
case integer of
    0: (i: integer);
    1: (a: byte; b: byte; c: byte; d: byte);
end;

Я, например, пользуюсь подобным для перебора диапазона айпишников. Так гораздо удобнее, чем постоянно вызывать StrToInt

Покажите, пожалуйста, в коде, если не трудно.