Доброй ночи! Подскажите пожалуйста...
Я объявил перечисление и множество:
type
 EMyEnum = (
   MyEnumA,
   MyEnumB,
   MyEnumC
 );
 TMyEnum = EMyEnum;
 TMySet = Set Of TMyEnum;
И написал функцию:
procedure MyTest(F: DWORD; E: TMyEnum; M: DWORD; S: TMySet; L: DWORD);
begin
// SizeOf(E) == 1
// SizeOf(S) == 1
...
end;
Переменные-параметры получаются размером один байт. А сколько будет "выделено места" при их передаче? Тоже один? Или четыре? Этим можно как-то управлять? Я хочу чтоб все параметры были одинакового размера, чтоб в другой программе можно было импортировать и использовать мою функцию как: MyTest(DWORD, DWORD, DWORD, DWORD, DWORD).
В данном случае мне даже не важно сколько будет SizeOf самой переменной, меня пока интересует конкретно выравнивание при передаче параметров. Хотя и про размер переменных тоже было бы хорошо разобраться, на будущее.
Спасибо!

use Ord

http://docwiki.embarcadero.com/RADStudio/Tokyo/en/Internal_Data_Formats_(Delphi)#Set_Types

Ord это в смысле функция возвращающая Integer или Int64? А зачем она мне тут?
Я хочу чтоб унифицированный заголовок моей функции был "пять параметров по 4 байта каждый", для совместимости, но при этом в Делфи использовать некоторые параметры как перечисление или множество, для удобства и исключения ошибок.

>> but a set always resides in memory if it is larger than the platform-dependent integer type

Мне не нужно "больше чем integer type", мне нужно "точно равно 4 байта" или же "точно равно размеру integer type".

Кажется нашёл такое:
type
 {$MINENUMSIZE 4}
 EMyEnum = (
   MyEnumA,
   MyEnumB,
   MyEnumC
 );
 TMyEnum = EMyEnum;
 TMySet = Set Of TMyEnum;
 {$MINENUMSIZE 1}
Но поправилось только первое, а второе всё равно один байт:
procedure MyTest(F: DWORD; E: TMyEnum; M: DWORD; S: TMySet; L: DWORD);
begin
// SizeOf(E) == 4
// SizeOf(S) == 1
...
end;

Надо чтоб параметры M и L были строго по смещению 8 и 16. Может просто добавить какой-нибудь stdcall? Чтоб функцию можно было импортировать как

Научите пожалуйста, как смотреть/понимать в отладчике код вызова этой функции - сколько передаётся параметров, как передаётся, и какого они размера?

Игорь уже дал описание.
Разве что дополню:
http://dwarfstd.org/doc/Dwarf3.pdf

> Научите пожалуйста, как смотреть/понимать в отладчике код
> вызова этой функции - сколько передаётся параметров, как
> передаётся, и какого они размера?

http://docwiki.embarcadero.com/RADStudio/Tokyo/en/Program_Control_(Delphi)#Register_Convention

Описание чего? Там просто "что такое Set", я и так знаю что это. Но я же не это спрашиваю - а как заставить его быть размером в 4 байта. Этого там нету.

Что за Юникс-Гномы я не понял совсем...

По последней ссылке написано:

>> Sets, records, and static arrays of 1, 2, or 4 bytes are passed as 8-bit, 16-bit, and 32bit values.

Вывод - передаётся не так как я хочу. Ну а как принудительно заставить всегда быть 32bit? Там не сказано. Никак?

сет это 256 возможных членов.
то есть физически это максимум 256 бит или 32 байта.

а как заставить его быть размером в 4 байта

чтобы стало 4 байта, надо сделать твой енум нужной длины (32 члена) и включить максимальный член в множество.

либо при проектировании выбирать типы данных не от балды, а со смыслом.

Если нужна связь с программами на других языках - я бы не рисковал
Просто объявил ручками константы нужные (в каждой один бит в 1) и сам тип объявил нужным мне

Ибо гадать с размерами и проч., а потом вылавливать не понятные кривости поведения - удовольствие так себе.

>  Там не сказано. Никак?

Зачем это вам? Всё равно в других языках нет аналога set of. Так что работать с ним не сможете. Делать конвертер, так лучше сразу со стороны вашей библиотеки. Тем более это внешняя связь, а значит данные требуют проверки и нормировки пред их применением.

если нужны DWORD значит и переменные должны быть DWORD, в масиве/еще как то не принципиально (если в общем а не под задачу).

> Чтоб функцию можно было импортировать как void MyTest(DWORD F, DWORD E, DWORD M, DWORD S, DWORD L);
и кстати параметры в функцию передаются через стек, а не массивом/сетом за раз... если понял смысл поста.

Я хочу использовать в своём коде удобные мне вещи - перечисление и множество.
Читать удобнее, писать удобнее (Code Completion адаптируются), дорабатывать удобнее, RTTI подхватывает тип, отлаживать удобнее. Плюс они добавляют дополнительную защиту от неправильного использования.
А когда какую-то часть функций понадобится экспортировать - то эти "другие языки которые не уметь set of" - пусть себе тогда они объявляют заголовок как DWORD и передают константы (раз уж они не могут иначе).
Чего это я должен отказываться от очень хороших плюшек, из-за того что другие чего-то там не умеют?

> чтобы стало 4 байта, надо сделать твой енум нужной длины (32 члена) и включить максимальный член в множество.

гм! Добавил пунктов MyEnum* до 32 штук - стало 4 байта! Спасибо!
Вот только что делать если мне их там стока не нужно? Допустим что нужно три... Мешаются же остальные. Можно ли их как-то оставить в объявлении, но исключить из использования?
Имею ввиду запретить использовать в коде и не показывать в Code Completion? Deprecated получается применять только ко всему перечислению...

type
 {$MINENUMSIZE 4}
 EMyEnum = (
   MyEnumA, // 1
   MyEnumB, // 2
   MyEnumC, // 3
   MyEnumReserved4,
   MyEnumReserved5,
   MyEnumReserved6,
   MyEnumReserved7,
   MyEnumReserved8,
   MyEnumReserved9,
   MyEnumReserved10,
   MyEnumReserved11,
   MyEnumReserved12,
   MyEnumReserved13,
   MyEnumReserved14,
   MyEnumReserved15,
   MyEnumReserved16,
   MyEnumReserved17,
   MyEnumReserved18,
   MyEnumReserved19,
   MyEnumReserved20,
   MyEnumReserved21,
   MyEnumReserved22,
   MyEnumReserved23,
   MyEnumReserved24,
   MyEnumReserved25,
   MyEnumReserved26,
   MyEnumReserved27,
   MyEnumReserved28,
   MyEnumReserved29,
   MyEnumReserved30,
   MyEnumReserved31,
   MyEnumReserved32
 );
 {$MINENUMSIZE 1}

> Допустим что нужно три...
4 байта это всего один DWORD, три байта никак нельзя, если конечно хочешь "делить память" DWORD-ами.
так то у set-а увеличение побайтное, вроде... (не проверял, может еще как то выравнивание влияет), т.е. убери последние минимум 8 максимум 15 значений и будет тебе 3 байта.

> Чародей Ученика   (09.07.18 14:29) [12]
> А когда какую-то часть функций понадобится экспортировать
> - то эти "другие языки которые не уметь set of" - пусть
> себе тогда они объявляют заголовок как DWORD и передают
> константы (раз уж они не могут иначе).

Другие просто скажут "а иди ты лесом с таким интерфейсом"
И будут правы.

"Если ты плюнешь в коллектив - коллектив утрётся. Если коллектив плюнет в тебя - утонешь."

> три байта никак нельзя

Это было не про "байты", а про количество элементов в описании EMyEnum.
А размер нужен эквивалентный DWORD. Но он уже получен. Просто неудобно что 29ть лишних холостых MyEnum* болтаются.

> Другие просто скажут "а иди ты лесом с таким интерфейсом"

А какое дело "другим" до внутреннего устройства моей системы? И почему я должен из-за кого-то урезать свой внутренний инструментарий?
И я же как раз универсальности и добиваюсь: умеете работать с "set of" - используйте вот такой-то "set of", не умеете - используйте DWORD и такие-то константы. Всё по желанию/возможностям.

> Просто неудобно что 29ть лишних холостых MyEnum* болтаются.
set of byte - максимальный размер.

TMyEnumWord = 0..31;
TMySet = set of TMyEnumWord; - "удобный" размер;

> не умеете - используйте DWORD и такие-то константы.
с константами геморрой будет, типа в сете 1, а в дворде 4096 и т.д. ... ну или типа, смотря как там в памяти хранится, а оно вовсе не биты в линеечку слева направо как тебе похоже представляется.

> смотря как там в памяти хранится
хотя, с первой половиной (до 16) проблем не будет, после значение скачет, т.к. старший ворд располагается по младшему адресу... проверь

1) https://yandex.ru/search/?text=SizeOf%20Множество%20site%3Adelphimaster.ru
2) https://yandex.ru/search/?text=SizeOf%20Множество%20site%3Adelphimaster.net
~> http://www.delphimaster.net/view/2-1396021466/49-80