![]() |
|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
![]() |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
![]() Уважаемые профи! Подскажите, пытаюсь перевести код с Delphi2010 на XE5. При компиляции возникает ошибка.
E2033 Types of actual and formal var parameters must be identical if not LogonUser(Pchar('drozdovin'), Pchar('elcode.local'), Pchar('ilya1700'), LOGON32_LOGON_INTERACTIVE, LOGON32_PROVIDER_DEFAULT, hUserToken) then RaiseLastOSError; |
#2
|
||||
|
||||
![]() скорее всего проблема в последнем параметре. попробуй
if not LogonUser(Pchar('drozdovin'), Pchar('elcode.local'), Pchar('ilya1700'), LOGON32_LOGON_INTERACTIVE, LOGON32_PROVIDER_DEFAULT, @hUserToken) then RaiseLastOSError; Пишу программы за еду. __________________ |
#3
|
|||
|
|||
![]() спасибо)))))))))))))))
|