Как создать record внутри которого есть динамический массив с record-ами?

@Kuzya69 · Регистрация: 24.11.2012

Студворк — интернет-сервис помощи студентам

Упрощу код, чтоб не писать полные record-ы:

Delphi

type
  TSec = record
    vSize : DWord;
    vAddr : DWord;
    rSize : DWord;
    rAddr : DWord;
    Flag : DWord;
  end;
  TArrOfSec = Array Of TSec;
  TPeInf = record
    BaseOfCode : DWord;
    Flag : Word;
    NumberOfSection : Word;
    Sections : TArrOfSec;
  end;
var
  filePE : TPeInf;
begin
  NumberOfSection:= $7;
  SetLength(filePE.Sections, NumberOfSection); //вот тут ошибка,"E2197 Constant object cannot be passed as var parametr

Ясно, что память под запись уже выделена, а я пытаюсь ее увеличить. Но как вообще создавать record с переменным размером?

@mss · 27.12.2015, 20:09

Сообщение от Kuzya69

как вообще создавать record с переменным размером?

С чего бы он переменный ?
Как он был равен SizeOf(TPeInf), так им и останется, вне зависимости от того вызывал ты SetLength или не вызывал.

Размер записи вычисляется на стадии компиляции, а не в ранрайм

@Kuzya69 · 27.12.2015, 20:11 **[ТС]**

Ну и как быть в моем случае?

@mss · 27.12.2015, 20:16

а что тебя смущает ?

@Kuzya69 · 27.12.2015, 20:17 **[ТС]**

Не компилируется, я же в коде написал ошибку.

@mss · 27.12.2015, 20:20

а чем собссно не угодили списки ?

@Kuzya69 · 27.12.2015, 20:22 **[ТС]**

Просто так что-ли вопросы задаете? Вас мои ответы не интересуют? Или я не понимаю ваших вопросов?

@mss · 27.12.2015, 20:29

У меня нет такой ошибки - все нормально компиляется.

@Kuzya69 · 27.12.2015, 20:31 **[ТС]**

Спасибо, пойду косяк в коде искать. Видимо где-то в передачах в функцию, потерял свойство var этого массива.
Просто тут я код упростил. А у меня там посложнее, этот рекорд передается туда-сюда.

@mss · 27.12.2015, 20:40

Сообщение от Kuzya69

этот рекорд передается туда-сюда

потому и поинтересовался почему бы не использовать объекты, а не записи

объекты всегда представлены указателями

@Kuzya69 · 27.12.2015, 20:44 **[ТС]**

Просто внешний рекорд я заполняю в два захода с помощью CopyMemory прямо из открытого файла (а там во внешнем, побольше будет переменных, чем я написал). А у объекта не известно, как в памяти выстроятся адреса переменных. У записей они точно идут друг за другом.
PS
Нашел, сам был виноват, для красоты скобки лишние поставил.

@mss · 27.12.2015, 20:47

Сообщение от Kuzya69

внешний рекорд я заполняю в два захода с помощью CopyMemory прямо из открытого файла

Надеюсь поле Sections при этом не затрагивается ?

Сообщение от Kuzya69

у объекта не известно, как в памяти выстроятся адреса переменных. У записей они точно идут друг за другом

Объект по сути - та же запись.

@Kuzya69 · 27.12.2015, 20:51 **[ТС]**

Сообщение от mss

Надеюсь поле Sections при этом не затрагивается ?

Ну естественно, для Sections, пока только пишется код.

Сообщение от mss

Объект по сути - та же запись.

Не стал разбираться. С рекордами точно уверен, потому-что долго их в дизассемблере гонял, чтоб убедиться. Кстати вместо record я использую packed record, чтоб не было выравнивания.

@mss · 27.12.2015, 20:55

Сообщение от Kuzya69

С рекордами точно уверен

Ну и с объектами все точно так же - смещения полей соответствуют порядку их объявления

Добавлено через 59 секунд

Сообщение от Kuzya69

вместо record я использую packed record, чтоб не было выравнивания

И это правильно.

@Kuzya69 · 27.12.2015, 21:03 **[ТС]**

Сообщение от mss

Ну и с объектами все точно так же - смещения полей соответствуют порядку их объявления

А если объект сложный, как вот я объявляю? Между первым элементом массива и последним элементом внешней записи, не будет никаких служебных байт? Или то-же самое, но между последним элеменом массива и следующим элементом внешней записи?

Добавлено через 2 минуты
А стоп, затупил. Прошу прощения. Тут-же не массив а указатель на него.

@mss · 27.12.2015, 21:07

Сообщение от Kuzya69

Тут-же не массив а указатель на него

Именно так.
А размер указателя всегда одинаков для выбранной платформы.

@Kuzya69 · 27.12.2015, 21:10 **[ТС]**

Сообщение от mss

размер указателя всегда одинаков для выбранной платформы.

Тоесть, если я буду использовать свою программу на 64-х битной ОС, то указатель изменит размерность на QWord? Даже если программа будет 32-х битная.
Или все-же прокладка wow64, оставит DWord?

@mss · 27.12.2015, 21:13

Сообщение от Kuzya69

Или все-же прокладка wow64, оставит DWord?

Компилятор не знает ни о каких "прокладках".
Ему сказали что приложение должно работать в 32-битном окружении - он строит код на базе 32-битных указателей.
Скажут про 64-битное - будет опираться на 64-битные.

@Kuzya69 · 27.12.2015, 21:16 **[ТС]**

Понятно, значит под словом "платформа" подразумевалось "платформа компилятора", а не "платформа ОС".

@mss · 27.12.2015, 21:20

Платформа компилятора однозначно связана с целевой ОС-платформой.
dcc64 генерит код для 64-битной ОС-платформы, dcc32 - для 32-битной

@mss 2664 / 2270 / 279 Регистрация: 24.12.2010 Сообщений: 13,723
	27.12.2015, 20:55	14
	Сообщение от Kuzya69 С рекордами точно уверен Ну и с объектами все точно так же - смещения полей соответствуют порядку их объявления Добавлено через 59 секунд Сообщение от Kuzya69 вместо record я использую packed record, чтоб не было выравнивания И это правильно. 0

@mss 2664 / 2270 / 279 Регистрация: 24.12.2010 Сообщений: 13,723
	27.12.2015, 21:13	18
	Сообщение от Kuzya69 Или все-же прокладка wow64, оставит DWord? Компилятор не знает ни о каких "прокладках". Ему сказали что приложение должно работать в 32-битном окружении - он строит код на базе 32-битных указателей. Скажут про 64-битное - будет опираться на 64-битные. 0

@mss 2664 / 2270 / 279 Регистрация: 24.12.2010 Сообщений: 13,723
	27.12.2015, 20:09	2
	Сообщение от Kuzya69 как вообще создавать record с переменным размером? С чего бы он переменный ? Как он был равен SizeOf(TPeInf), так им и останется, вне зависимости от того вызывал ты SetLength или не вызывал. Размер записи вычисляется на стадии компиляции, а не в ранрайм 0

@Kuzya69 39 / 2 / 1 Регистрация: 24.11.2012 Сообщений: 246
	27.12.2015, 20:11 [ТС]	3
	Ну и как быть в моем случае? 0

@mss 2664 / 2270 / 279 Регистрация: 24.12.2010 Сообщений: 13,723
	27.12.2015, 20:16	4
	а что тебя смущает ? 0

@Kuzya69 39 / 2 / 1 Регистрация: 24.11.2012 Сообщений: 246
	27.12.2015, 20:17 [ТС]	5
	Не компилируется, я же в коде написал ошибку. 0

@mss 2664 / 2270 / 279 Регистрация: 24.12.2010 Сообщений: 13,723
	27.12.2015, 20:20	6
	а чем собссно не угодили списки ? 0

@Kuzya69 39 / 2 / 1 Регистрация: 24.11.2012 Сообщений: 246
	27.12.2015, 20:22 [ТС]	7
	Просто так что-ли вопросы задаете? Вас мои ответы не интересуют? Или я не понимаю ваших вопросов? 0

@mss 2664 / 2270 / 279 Регистрация: 24.12.2010 Сообщений: 13,723
	27.12.2015, 20:29	8
	У меня нет такой ошибки - все нормально компиляется. 0

@Kuzya69 39 / 2 / 1 Регистрация: 24.11.2012 Сообщений: 246
	27.12.2015, 20:31 [ТС]	9
	Спасибо, пойду косяк в коде искать. Видимо где-то в передачах в функцию, потерял свойство var этого массива. Просто тут я код упростил. А у меня там посложнее, этот рекорд передается туда-сюда. 0

@mss 2664 / 2270 / 279 Регистрация: 24.12.2010 Сообщений: 13,723
	27.12.2015, 20:40	10
	Сообщение от Kuzya69 этот рекорд передается туда-сюда потому и поинтересовался почему бы не использовать объекты, а не записи объекты всегда представлены указателями 0

@Kuzya69 39 / 2 / 1 Регистрация: 24.11.2012 Сообщений: 246
	27.12.2015, 20:44 [ТС]	11
	Просто внешний рекорд я заполняю в два захода с помощью CopyMemory прямо из открытого файла (а там во внешнем, побольше будет переменных, чем я написал). А у объекта не известно, как в памяти выстроятся адреса переменных. У записей они точно идут друг за другом. PS Нашел, сам был виноват, для красоты скобки лишние поставил. 0

Опции темы

@mss 2664 / 2270 / 279 Регистрация: 24.12.2010 Сообщений: 13,723
	27.12.2015, 20:47	12
	Сообщение от Kuzya69 внешний рекорд я заполняю в два захода с помощью CopyMemory прямо из открытого файла Надеюсь поле Sections при этом не затрагивается ? Сообщение от Kuzya69 у объекта не известно, как в памяти выстроятся адреса переменных. У записей они точно идут друг за другом Объект по сути - та же запись. 0

@Kuzya69 39 / 2 / 1 Регистрация: 24.11.2012 Сообщений: 246
	27.12.2015, 20:51 [ТС]	13
	Сообщение от mss Надеюсь поле Sections при этом не затрагивается ? Ну естественно, для Sections, пока только пишется код. Сообщение от mss Объект по сути - та же запись. Не стал разбираться. С рекордами точно уверен, потому-что долго их в дизассемблере гонял, чтоб убедиться. Кстати вместо record я использую packed record, чтоб не было выравнивания. 0

@Kuzya69 39 / 2 / 1 Регистрация: 24.11.2012 Сообщений: 246
	27.12.2015, 21:03 [ТС]	15
	Сообщение от mss Ну и с объектами все точно так же - смещения полей соответствуют порядку их объявления А если объект сложный, как вот я объявляю? Между первым элементом массива и последним элементом внешней записи, не будет никаких служебных байт? Или то-же самое, но между последним элеменом массива и следующим элементом внешней записи? Добавлено через 2 минуты А стоп, затупил. Прошу прощения. Тут-же не массив а указатель на него. 0

@mss 2664 / 2270 / 279 Регистрация: 24.12.2010 Сообщений: 13,723
	27.12.2015, 21:07	16
	Сообщение от Kuzya69 Тут-же не массив а указатель на него Именно так. А размер указателя всегда одинаков для выбранной платформы. 0

@Kuzya69 39 / 2 / 1 Регистрация: 24.11.2012 Сообщений: 246
	27.12.2015, 21:10 [ТС]	17
	Сообщение от mss размер указателя всегда одинаков для выбранной платформы. Тоесть, если я буду использовать свою программу на 64-х битной ОС, то указатель изменит размерность на QWord? Даже если программа будет 32-х битная. Или все-же прокладка wow64, оставит DWord? 0

@Kuzya69 39 / 2 / 1 Регистрация: 24.11.2012 Сообщений: 246
	27.12.2015, 21:16 [ТС]	19
	Понятно, значит под словом "платформа" подразумевалось "платформа компилятора", а не "платформа ОС". 0

@mss 2664 / 2270 / 279 Регистрация: 24.12.2010 Сообщений: 13,723
	27.12.2015, 21:20	20
	Платформа компилятора однозначно связана с целевой ОС-платформой. dcc64 генерит код для 64-битной ОС-платформы, dcc32 - для 32-битной 0