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

Вниз

Обработчик сообщений необрабатывает события.   Найти похожие ветки 

 
Dunk   (2004-09-28 21:32) [0]

При нажатий на кнопку генерируется событие BN_CLICKED,
в обработчике WM_COMMAND поставил условие что при возникновений этого события будут выплнятся определенные действия.
Программа делает это только один раз когда запуск.


 
Alex870   (2004-09-28 23:38) [1]

А код (или его кусок) можно глянуть? Если ты пишешь на голом API, то значит есть что-то типа:
function WindowProc (Window : HWnd; Message, WParam : Word;LParam : LongInt) : LongInt; stdcall;
begin
case Message of
 wm_command : if WParam = X then ..действие.., где X -идентификатор кнопки

end;
 WindowProc := DefWindowProc (Window, Message, WParam, LParam);
end;


 
Dunk   (2004-09-29 20:25) [2]

Вот код проги:
function WindowProc(wnd:HWND; Msg : Integer; wParam: WPARAM; lParam: LPARAM):LRESULT; stdcall;
var nCode, ctrlID : word;
begin
case msg of
WM_COMMAND :
 begin
   nCode:=hiWord(wParam);
   ctrlID:=loWord(wParam);
   case ctrlID of
   LBN_SETFOCUS  :
     begin
      SetWindowText(edit,"select");
     end;


 
Dunk   (2004-09-29 20:26) [3]

Сорри... событие BN_CLICKED


 
Digitman ©   (2004-09-30 09:33) [4]


> Dunk


в справке же черным по белому написано, что код нотификационного сообщения передается в старшем слове параметра wParam !
какого же шута ты делаешь case ctrlID , если код у тебя лежит в nCode ?



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

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

Наверх




Память: 0.44 MB
Время: 0.034 c
14-1098039450
Барбос
2004-10-17 22:57
2004.11.07
фракталы и система координат


1-1098687169
svv
2004-10-25 10:52
2004.11.07
Как добавить TAction код клавиши + с цифровой клавы


3-1097081408
suharew
2004-10-06 20:50
2004.11.07
Как запихнуть картинку в БД


14-1098411951
Leaner
2004-10-22 06:25
2004.11.07
Преимущества сервиса


4-1096456968
Сергей Ю.
2004-09-29 15:22
2004.11.07
Работа со сканером штрих-кодов





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский