Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > Синтаксис
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 23.04.2013, 15:32
sova_bos sova_bos вне форума
Прохожий
 
Регистрация: 27.03.2012
Адрес: Ставрополь
Сообщения: 12
Версия Delphi: XE3/7
Репутация: 10
Вопрос переменная типа THandle

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

Вот кусочек кода
Код:
var  DllHandle: THandle;
...
DllHandle := LoadLibrary('ITLSSPProc.dll');
 if DllHandle>=32 then       
   begin ... end
;

вопрос: в переменной загружена библиотека (внутренности которой, кстати, тоже вызывают бурю негодования), как можно эту переменную сравнить с числом?
Пробовала написать так для эксперимента:
Код:
var  DllHandle: THandle;
...
DllHandle := 32;
 if DllHandle>=32 then       
   begin ... end
;

а вот нифига)
__________________
Всё будет правильно

Последний раз редактировалось sova_bos, 23.04.2013 в 15:43.
Ответить с цитированием
  #2  
Старый 23.04.2013, 15:59
Аватар для NumLock
NumLock NumLock вне форума
Let Me Show You
 
Регистрация: 30.04.2010
Адрес: Северодвинск
Сообщения: 5,426
Версия Delphi: 7, XE5
Репутация: 59586
По умолчанию

Код:
var
  DllHandle: HMODULE;
begin
  DllHandle:=LoadLibrary('xxx');
  if DllHandle<>0 then
  begin
  end;
end;
__________________
Пишу программы за еду.
__________________
Ответить с цитированием
  #3  
Старый 23.04.2013, 16:05
Аватар для M.A.D.M.A.N.
M.A.D.M.A.N. M.A.D.M.A.N. вне форума
Sir Richard Abramson
 
Регистрация: 05.04.2008
Сообщения: 5,505
Версия Delphi: XE10
Репутация: выкл
По умолчанию

MSDN советует еще проверять GetLastError <> ERROR_SUCCESS для получения детальных подробностей.
__________________
— Как тебя понимать?
— Понимать меня не обязательно. Обязательно меня любить и кормить вовремя.


На Delphi, увы, больше не программирую.
Рекомендуемая литература по программированию
Ответить с цитированием
  #4  
Старый 23.04.2013, 16:10
sova_bos sova_bos вне форума
Прохожий
 
Регистрация: 27.03.2012
Адрес: Ставрополь
Сообщения: 12
Версия Delphi: XE3/7
Репутация: 10
По умолчанию

да оно и в таком виде работает
Код:
var  DllHandle: THandle;
...
DllHandle := LoadLibrary('ITLSSPProc.dll');
 if DllHandle>=32 then      
   begin ... end
я не пойму КАК это работает, и почему можно сравнить с числом
__________________
Всё будет правильно
Ответить с цитированием
  #5  
Старый 23.04.2013, 16:14
Аватар для M.A.D.M.A.N.
M.A.D.M.A.N. M.A.D.M.A.N. вне форума
Sir Richard Abramson
 
Регистрация: 05.04.2008
Сообщения: 5,505
Версия Delphi: XE10
Репутация: выкл
По умолчанию

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

Читай MSDN.
__________________
— Как тебя понимать?
— Понимать меня не обязательно. Обязательно меня любить и кормить вовремя.


На Delphi, увы, больше не программирую.
Рекомендуемая литература по программированию
Ответить с цитированием
Этот пользователь сказал Спасибо M.A.D.M.A.N. за это полезное сообщение:
sova_bos (23.04.2013)
  #6  
Старый 23.04.2013, 16:18
Black Raider Black Raider вне форума
Местный
 
Регистрация: 31.05.2010
Адрес: Москва
Сообщения: 466
Версия Delphi: 7
Репутация: 40
По умолчанию

Handle - это уникальный идентификатор, который представляет собой целое 32-х битное (4-х байтное) число. Handle позволяет обращаться к чему-либо в системе не по имени (или еще чему там можно придумать), а по соответствующему уникальному идентификатору. Например каждый элемент окна имеет свой handle. Все значения идентификаторов разные, т.е. уникальные. Если есть два одинаковых окна, то элементы этих окон все равно будут иметь разные идентификаторы. Понятие handle используется не только для идентификации элементов окна, но и например для файлов, процессов, потоков (threads) и т.д. На самом деле ОС работает с файлами, процессами, потоками (threads) не по их имени, а по их идентификатору.
__________________
Новый вирус - "БОМЖ"! Он просто роется в Корзине...и спит под ярлычком "Сетевое окружение"
Ответить с цитированием
Этот пользователь сказал Спасибо Black Raider за это полезное сообщение:
sova_bos (23.04.2013)
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра
Комбинированный вид Комбинированный вид

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 10:59.


 

Сайт

Форум

FAQ

RSS лента

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2023

ВКонтакте   Facebook   Twitter