Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.07.18;
Скачать: CL | DM;

Вниз

   Найти похожие ветки [EnableWindow]

 
Kair ©   (2004-06-03 21:53) [0]

var
 Enbd: Boolean = True;

procedure SetEnable(Value: Boolean);
begin
if EnableWindow(Wnd, Value) then
 begin
  Enbd := Value;
 end;
end;

Процедура SetEnable(False) окно блокирует, но Enbd в False не устанавливается...
Почему?


 
panov ©   (2004-06-03 22:32) [1]

А почему процедура и в ней не var-параметр?

If the window was previously disabled, the return value is nonzero.

If the window was not previously disabled, the return value is zero. To get extended error information, call GetLastError.

var
Enbd: Boolean = True;

procedure SetEnable(var Value: Boolean);
begin
 EnableWindow(Wnd, Value);
 Enbd := IsWindowEnabled(Wnd);
end;


 
panov ©   (2004-06-03 22:33) [2]

А почему процедура и в ней не var-параметр?
Прошу прощения - сначала не заметил, что переписывается другая переменная.


 
Kair ©   (2004-06-04 05:58) [3]

Ага, спасибо.



Страницы: 1 вся ветка

Текущий архив: 2004.07.18;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.047 c
4-1086366053
Боян Георгиев
2004-06-04 20:20
2004.07.18
Mouse click emulation?


1-1089181098
StarWolf
2004-07-07 10:18
2004.07.18
Динамическое создание элементов на форме


14-1088399763
VEG
2004-06-28 09:16
2004.07.18
Есть довольно раскрученный ресурс. Что посоветуете?


1-1088631701
HF-Trade
2004-07-01 01:41
2004.07.18
Скролинг


14-1088508869
Rem
2004-06-29 15:34
2004.07.18
Культура Пития