Главная страница
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.054 c
1-1089000961
newver
2004-07-05 08:16
2004.07.18
доступ к "изображению".


3-1087749934
REd_imp
2004-06-20 20:45
2004.07.18
Поддержка украинский символов в *.dbf файле.


1-1088859661
CyberSpy
2004-07-03 17:01
2004.07.18
Listview


9-1079683459
Morok
2004-03-19 11:04
2004.07.18
собсна взаимодействие шариков....


11-1077396942
nester
2004-02-21 23:55
2004.07.18
Есть ли в КОЛ аналог ShellExecute или WinExec?