Это окно сообщения будет выведено при выполнении программы PInvoke.cpp

Рисунок 15.7. Это окно сообщения будет выведено при выполнении программы PInvoke.cpp

В приведенном примере PInvoke (Platform Invocation Services, Службы обращения к платформе) не показано, как службы обращения к платформе PInvoke (Platform Invocation Services) автоматически выполняют маршалинг выходных параметров. Это связано с тем, что MessageBox имеет только входные параметры. В следующем примере вызываются интерфейсы прикладных программ (API) GetComputerName и GetLastError посредством служб обращения к платформе PInvoke (Platform Invocation Services)
Первый параметр функции GetComputerName с именем IpBuffer, является выходным указателем на буфер, в который записывается строка с завершающим нулем, содержащая имя компьютера в случае успешного выполнения функции Второй параметр IpnSize является и входным, и выходным. В случае использования его в качестве входного параметра, в нем задается длина буфера IpBuffer в символах TCHAR. В случае использования его в качестве выходного параметра в нем указывается фактическая длина имени компьютера в символах TCHAR, которая содержится в IpBuffer, причем завершающий нулевой символ при подсчете длины не учитывается. Возвращаемое значение указывает, было ли успешным выполнение функции. Ненулевое значение указывает на ее успешное выполнение, а нулевое — на ошибку. Если возвращенное значение равно нулю, можно использовать функцию GetLastError для определения причины ошибки. Например, если буфер оказался недостаточно длинным для имени компьютера, эта функция вернет константу ERROR_BUFFER_OVERFLOW, имеющую значение 111. Если вы хотите попробовать самостоятельно использовать службы обращения к платформе PInvoke (Platform Invocation Services), и не будете против приложить некоторые усилия, то можете вызвать функцию интерфейса прикладных программ (API) FormatMessage для перевода этого номера ошибки в более осмысленную строку. Если вы это сделаете, и в достаточной мере укоротите длину буфера, то получите описание ошибки: "The File name is too long" ("Имя файла слишком длинное"). Прототипы функций GetComputerName и GetLastError приведены ниже:

BOOL GetComputerName( // ЛОГИЧЕСКАЯ (БУЛЕВА)
LPTSTR IpBuffer, // имя компьютера
LPDWORD IpnSize // размер буфера для имени
) ;
DWORD GetLastError(VOID) ;

В следующем примере показано, как вызвать функции GetLastError и GetComputerName из кода на управляемом C++ с помощью служб обращения к платформе РInvoke (Platform Invocation Services). Обе эти функции интерфейса прикладного программирования находятся в библиотеке Kernel32 .dll, поэтому атрибут [Dlllmport ("Kernel32" ) ] использован в обоих случаях. Заметим, что маршалинг для каждого выходного параметра выполняется автоматически. Хотя это и не показано в данном простом примере, для управления деталями маршалинга, выполняемого службами обращения к платформе PInvoke (Platform Invocation Services), можно использовать атрибуты. Впрочем, это необходимо только в том случае, если маршалинг, выполняемый по умолчанию службами обращения к платформе PInvoke (Platform Invocation Services), является неудовлетворительным.

//PInvokeOutParam.cpp

fusing <mscorlib.dll>
using namespace System;
// использование пространства имен Система;
using namespace System::Runtime::InteropServices;
// использование пространства имен
// Система::Время выполнения::InteropServices;
typedef int BOOL; // ЛОГИЧЕСКИЙ (БУЛЕВ)
typedef unsigned long DWORD; // без знака
#define MAX_COMPUTERNAME_LENGTH 31
[Dlllmport("Kernel32")]
extern "C" BOOL GetComputerName(
signed char *lpBuffer, UInt32* IpnSize); // символ
// со знаком
*lpBuffer
[Dlllmport("Kernel32")]
extern "C" DWORD GetLastError();
void main(void) {
signed char * IpBuffer = // символ со знаком
new signed char[MAX_COMPUTERNAME_LENGTH + 1]; // новый символ
// со знаком
UInt32 size = MAX_COMPUTERNAME_LENGTH + 1; // размер
BOOL bResult = GetComputerName(IpBuffer, Ssize);
if (bResult)
{
String *pstrComputerName = // Строка
new String((signed char *)IpBuffer); // новая Строка ((символ со знаком *)
IpBuffer);
Console::WriteLine(
"Computer Name: {0}", pstrComputerName); // Имя компьютера
}
else
{
DWORD dwLastError = GetLastError ();
Console::WriteLine(
"Last Error: {0}", _box(dwLastError)); // Последняя
// ошибка
}
}

Когда вы запустите на выполнение пример PInvokeOutParam, то увидите нечто подобное приведенному ниже, за исключением того, что будет указано реальное имя вашего компьютера, а не моего.

Computer Name: PT-2HBHVPJUGOT9

Содержание раздела

---

---