[sova_bos]

Необходимо досконально разобраться в коде (уже жалею, что подписалась на эту работу )

Вот кусочек кода

Код:

var  DllHandle: THandle;
...
DllHandle := LoadLibrary('ITLSSPProc.dll');
 if DllHandle>=32 then       
   begin ... end

;

вопрос: в переменной загружена библиотека (внутренности которой, кстати, тоже вызывают бурю негодования), как можно эту переменную сравнить с числом?
Пробовала написать так для эксперимента:

Код:

var  DllHandle: THandle;
...
DllHandle := 32;
 if DllHandle>=32 then       
   begin ... end

;

а вот нифига)

[NumLock]

Код:

var
  DllHandle: HMODULE;
begin
  DllHandle:=LoadLibrary('xxx');
  if DllHandle<>0 then
  begin
  end;
end;

[M.A.D.M.A.N.]

MSDN советует еще проверять GetLastError <> ERROR_SUCCESS для получения детальных подробностей.

[sova_bos]

да оно и в таком виде работает

Код:

var  DllHandle: THandle;
...
DllHandle := LoadLibrary('ITLSSPProc.dll');
 if DllHandle>=32 then      
   begin ... end

я не пойму КАК это работает, и почему можно сравнить с числом

[M.A.D.M.A.N.]

Ну потому, что указатель - это число.

Читай MSDN.

[Black Raider]

Handle - это уникальный идентификатор, который представляет собой целое 32-х битное (4-х байтное) число. Handle позволяет обращаться к чему-либо в системе не по имени (или еще чему там можно придумать), а по соответствующему уникальному идентификатору. Например каждый элемент окна имеет свой handle. Все значения идентификаторов разные, т.е. уникальные. Если есть два одинаковых окна, то элементы этих окон все равно будут иметь разные идентификаторы. Понятие handle используется не только для идентификации элементов окна, но и например для файлов, процессов, потоков (threads) и т.д. На самом деле ОС работает с файлами, процессами, потоками (threads) не по их имени, а по их идентификатору.

[sova_bos]

Всем большое спасибо =)

[sova_bos]

Хочу еще поразмышлять по поводу этого кода. Автор, к сожалению для меня недоступен, но вот интересно же, зачем сравнивать DllHandle с 32? сколько я не тестила, значение всегда какое-то 8-ми значное число, при чем результаты иногда повторяются... поставила в условии 1000, все работает так же

[cotseec]

Сообщение от sova_bos

но вот интересно же, зачем сравнивать DllHandle с 32? сколько я не тестила, значение всегда какое-то 8-ми значное число

Возвpащаемое значение:

В случае успешного завеpшения - идентификатоp экземпляpа модуля библиотеки (значение, больше 32); если нет, то его значение меньше 32 и является одним из следующих: (0) нет памяти; (5) попытка связать задачу; (11) невеpный файл EXE; (12) пpикладная задача из OS/2; (13) пpикладная задача из DOS 4.0; (14) невеpный тип EXE; (15) незащищенный pежим.

LoadLibrary как-то так.....
указанные значения являются константами

[icWasya]

32 - это пережиток 16-разрядных систем.
Теперь, в случае ошибки, функция возвращает 0, а признак ошибки нужно проверять GetLastError.

[M.A.D.M.A.N.]

LoadLibrary какбе возвращает адрес, по которому была загружена дллка.

[Aristarh Dark]

Сообщение от M.A.D.M.A.N.

LoadLibrary какбе возвращает адрес, по которому была загружена дллка.

Неправда ваша

Сообщение от MSDN

Return value

If the function succeeds, the return value is a handle to the module.

[M.A.D.M.A.N.]

Дак а если сходить по этому адресочку?
Я ходил, там сигнатура MZ и PE заголовок.

Вот пруфы:
hDll := LoadLibrary('мая длл');
Значение:

Дамп:

[Bargest]

Неправда ваша

Да, это хендл. Который на деле адрес. Многие умники юзают так: делают LoadLibrary('kernel32.dll'), потом начиная от возвращенного значения ищут в памяти какой-нибудь набор байт (который, к примеру, представляет собой начало функции CreateFile). Находят - узнают адрес функции. Эдакий GetProcAddress без вызова оного и без анализа таблицы экспорта.

[NumLock]

Сообщение от sova_bos

зачем сравнивать DllHandle с 32?

сравнивай с 0 и не забивай себе голову:

Return value
If the function succeeds, the return value is a handle to the module.
If the function fails, the return value is NULL. To get extended error information, call GetLastError.

http://msdn.microsoft.com/en-us/libr...(v=vs.85).aspx