Взаимодействие cpp-dll и delphi-программы

@6a6kin · Регистрация: 18.04.2010

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

Есть программа, написанная на делфи, а также две длл: одна на с++, другая на делфи.
Программа передает параметр - указатель packed record.

Delphi

PToRec = ^TRec;
  TRec = packed record
    mybool: Boolean;
    dt: TDateTime;
    s1: String[20];
    s2: String[54];
    s3: String[26];
    num: Integer;
  end;

Экспортируемая функция принимает этот указатель и интерпретирует его как структуру вида:

C++

#pragma pack(push, 2)
struct data
{
    bool        b1;
    double     d1;
    char        s1[21];
    char        s2[55];
    char        s3[27];
    int          i1;
};
#pragma pack(pop)

Однако, при заполнении структуры в cpp-длл, программа неправильно обрабатывает поля структуры(скорее всего, не совпадают адреса полей в спп и делфи)

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

@6a6kin · 15.11.2010, 21:52 **[ТС]**

Есть хоть какие идеи?

@Nameless One · 17.11.2010, 03:54

Может потому, что в Си приходится для каждой строки дополнительно выделять один байт под символ '\0'?

@6a6kin · 17.11.2010, 23:51 **[ТС]**

Размер совпадает, да и сами поля не до предела заполнены. Да и как тогда объяснить, что double или int тоже неправильно обрабатывает?

Не по теме:

А вообще, когда читал про соответствие делфи и Си строк, кто-то писал, что строки в делфи тоже должны заканчиваться нулом, только программисту не нужно об этом заботиться.

@nxnx · 18.11.2010, 00:57

использовать shortstring вместо string

Добавлено через 3 минуты
хотя нет, лучше массив символов

Добавлено через 3 минуты

Delphi

 TRec = packed record
    mybool: Boolean;
    dt: TDateTime;
    s1: array[0..20] of char;
    s2: array[0..54] of char;
    s3: array[0..26] of char;
    num: Integer;
  end;

@Nameless One · 18.11.2010, 03:02

Не по теме:

Сообщение от 6a6ka

Размер совпадает, да и сами поля не до предела заполнены. Да и как тогда объяснить, что double или int тоже неправильно обрабатывает?

Не по теме:

А вообще, когда читал про соответствие делфи и Си строк, кто-то писал, что строки в делфи тоже должны заканчиваться нулом, только программисту не нужно об этом заботиться.

Это было лишь скромное предположение

@6a6kin · 24.11.2010, 00:07 **[ТС]**

Я считаю, что все дело в packed. Скорее всего алгоритмы цпп и делфи различны. Однако моих скудных знаний не хватает, чтобы проверить это.

@6a6kin 232 / 102 / 6 Регистрация: 18.04.2010 Сообщений: 294
	15.11.2010, 21:52 [ТС]	2
	Есть хоть какие идеи? 0

@Nameless One 5828 / 3479 / 358 Регистрация: 08.02.2010 Сообщений: 7,448
	17.11.2010, 03:54	3
	Может потому, что в Си приходится для каждой строки дополнительно выделять один байт под символ '\0'? 0

@6a6kin 232 / 102 / 6 Регистрация: 18.04.2010 Сообщений: 294
	17.11.2010, 23:51 [ТС]	4
	Размер совпадает, да и сами поля не до предела заполнены. Да и как тогда объяснить, что double или int тоже неправильно обрабатывает? Не по теме: А вообще, когда читал про соответствие делфи и Си строк, кто-то писал, что строки в делфи тоже должны заканчиваться нулом, только программисту не нужно об этом заботиться. 0

@Nameless One
	18.11.2010, 03:02 #6
	Не по теме: Сообщение от 6a6ka Размер совпадает, да и сами поля не до предела заполнены. Да и как тогда объяснить, что double или int тоже неправильно обрабатывает? Не по теме: А вообще, когда читал про соответствие делфи и Си строк, кто-то писал, что строки в делфи тоже должны заканчиваться нулом, только программисту не нужно об этом заботиться. Это было лишь скромное предположение 0

@6a6kin 232 / 102 / 6 Регистрация: 18.04.2010 Сообщений: 294
	24.11.2010, 00:07 [ТС]	7
	Я считаю, что все дело в packed. Скорее всего алгоритмы цпп и делфи различны. Однако моих скудных знаний не хватает, чтобы проверить это. 0