• 15 апреля стартует «Курс «SQL-injection Master» ©» от команды The Codeby

    За 3 месяца вы пройдете путь от начальных навыков работы с SQL-запросами к базам данных до продвинутых техник. Научитесь находить уязвимости связанные с базами данных, и внедрять произвольный SQL-код в уязвимые приложения.

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

    Запись на курс до 25 апреля. Получить промодоступ ...

Передача структур через OleVariant

  • Автор темы Victor
  • Дата начала
Статус
Закрыто для дальнейших ответов.
V

Victor

День добрый. Вопрос такой. Каким образом, в Делфи возможно передать клиенту из метода COM некую структуру, используя OleVariant в качестве out параметра?
Заранее спасибо.
 
B

Barmutik

Попробуй

Type
TMyRec = Record
String1, String2 : String;
Integer1 : Integer;
End;

MyOleVariant := VarArrayCreate ([0, 3], VarVariant);
MyOleVariant [0] := MyRec.String1;
MyOleVariant[1] := MyRec.String2;
MyOleVariant[2] := MyRec.Integer1;

Ну и можеш передавать ..

Так же прочитай просто VarArrayLock, VarArrayUnlock, VarArrayReDim.. ну и в ту степь ...
 
Статус
Закрыто для дальнейших ответов.
Мы в соцсетях:

Обучение наступательной кибербезопасности в игровой форме. Начать игру!

Верх Низ