Возможно ли согласование 1: 1 структур C # с потоковыми записями Delphi?

Выравнивание обычно используется компилятором в качестве оптимизации. На самом деле каждая структура дополняется до кратного 4 (или 8, я точно не помню).

Обновление. То, что я сказал выше о выравнивании, неточно. Прочтите ответ Дэвида, чтобы узнать, как компилятор обрабатывает выровненные записи. Статья Википедии содержит разумный обзор: http://en.wikipedia.org/wiki/Data_structure_alignment

В любом случае вы можете использовать параметр Pack, чтобы указать выравнивание. Значение Pack, равное 1, возвращает точный размер структуры.

[StructLayout(LayoutKind.Sequential, CharSet = CharSet.Ansi, Pack = 1)]

По поводу массивов правильно использовать:

[MarshalAs(UnmanagedType.ByValArray, SizeConst = 20)]
public char[] someCharArray;

Просто позаботьтесь о том, чтобы при преобразовании из структуры в массив байтов массив должен соответствовать заявленному размеру. Перед преобразованием следует использовать Array.Resize, если содержимое короче.

struct.someCharArray = "Hello".ToCharArray();
Array.Resize<char>(ref struct.someCharArray, 20);

О маршалинге я использую этот метод из байта [] в структуру:

    public static T ParseStructure<T>(byte[] array, int offset) where T : struct
    {
        if (array == null) throw new ArgumentNullException("array", "Input parameter cannot be null");

        if (array.Length - offset < Marshal.SizeOf(typeof(T)))
            Array.Resize<byte>(ref array, Marshal.SizeOf(typeof(T)) + offset);

        int arraySize = array.Length - offset;
        T returnItem;

        // Allocate some unmanaged memory.
        IntPtr buffer = Marshal.AllocHGlobal(arraySize);

        // Copy the read byte array (byte[]) into the unmanaged memory block.
        Marshal.Copy(array, offset, buffer, arraySize);

        // Marshal the unmanaged memory block to a structure.
        returnItem = (T)Marshal.PtrToStructure(buffer, typeof(T));

        // Free the unmanaged memory block.
        Marshal.FreeHGlobal(buffer);

        return returnItem;
 }

А этот метод делает наоборот:

    public static byte[] StructureToArray<T>(T structure) where T : struct
    {
        int objectSize = Marshal.SizeOf(structure);
        byte[] result = new byte[objectSize];
        IntPtr buffer = Marshal.AllocHGlobal(objectSize);

        object dataStructure = (object)structure;

        Marshal.StructureToPtr(dataStructure, buffer, true);

        Marshal.Copy(buffer, result, 0, objectSize);
        Marshal.FreeHGlobal(buffer);
        return result;
    }

Кроме того, используйте следующий код, чтобы проверить размер, рассчитанный платформой:

int objectSize = Marshal.SizeOf(structure);

Наконец, я нашел эту прекрасную статью о маршалинге.

Я собираюсь предположить, что ваш компилятор Delphi работает в режиме по умолчанию и выравнивает записи. Я также предполагаю, что ваш код на Паскале содержит простую опечатку, когда в вашем массиве 5 элементов вместо 4.

Выравнивание выровненной записи определяется членом с наибольшим выравниванием. Самый большой член - это 8-байтовый двойной. Таким образом, запись имеет выравнивание 8. Ее размер является точным кратным ее выравниванию.

Каждое отдельное поле выравнивается, чтобы соответствовать выравниванию поля. Массив байтов имеет выравнивание 1 и может располагаться где угодно. 2-байтовые целые числа должны располагаться на 2-байтовых границах и т. Д. Записи могут иметь заполнение в конце, чтобы гарантировать, что массивы записи также будут выровнены. Итак, запись имеет размер, кратный 8. Ваша запись имеет размер 24.

В вашем случае заполнение перед 8-байтовым двойником и в конце записи. Если бы это дополнение в конце не было включено, 8-байтовый двойник будет неправильно выровнен в любых массивах вашей записи.

Нет необходимости вносить какие-либо изменения в ваши записи Delphi и объявления структур C #. Они уже заявлены правильно и идеально подходят друг другу.

Вы можете использовать SizeOf в Delphi и Marshal.SizeOf в C #, чтобы проверить размер ваших структур. Вы обнаружите, что они совпадают с кодом в вопросе.

Я не могу комментировать, как ваш код не удался, потому что вы не описали этот сбой. Моя основная мысль заключается в том, что любой сбой происходит не из-за несоответствия между вашими структурами. Нет никакого рационального объяснения источника числа 22. Я бы посмотрел, откуда это число.

Наконец, ответ, который вы приняли, предполагает использование упакованных структур. В этом нет необходимости, я не вижу причин для этого, и это не объясняет ваших проблем.