Этот вопрос периодически обсуждается , но я так и не могу коректно закрыть Messagebox
API destroy закрывает месаж , но после этого нет доступа к главному окну
на SendMessage Windows не реагирует , может я что то не то посылаю
Мне в идеале надо автоматически нажать на нужную клавишу в messagebox или скажем просто сделать Tab + Enter или хотябы коректно закрыть Messagebox
спасибо

//vizov messagebox

answer = messagebox( "WARNING!" , msgb_txt1 + " '" + st_2.text + "' " + msgb_txt2, Question!, YesNo! )


//ob'javleni API function
// ispolzoval raznie varianti


FUNCTION ulong FindWindA(ulong classname,string windowname) LIBRARY "User32.dll"

FUNCTION boolean DestroyWindow(ulong w_handle) LIBRARY "USER32.DLL"

SUBROUTINE keybd_event (int bVk, int bScan, int dwFlags, int dwExtraInfo) LIBRARY "user32.dll"

FUNCTION boolean CloseHandle(ulong w_handle) LIBRARY "Kernel32.dll"

FUNCTION long SendMessageA(ulong hwndle,UINT wmsg,ulong wParam,ulong lParam) Library "User32.dll"


// vneshnee sobitie po kotoromu nado zakrit messagebox
int a

boolean rtn
ulong l_handle
string ls_wname

ls_wname = "WARNING!" //gs_title_messagebox //"WARNING!" // message box
l_handle = FindWindowA(0, ls_wname)

// proboval po raznomu , no reakzii nebilo voobshe, kak ja opisival destroy zakrivaet messagebox , no k oknu ego vizvavshemu net dostupa , tak kak bud to messagebox ostalsa

//if l_handle <> 0 then
// keybd_event( 13, 0, 0, 0 )
// keybd_event( 13, 0, 2, 0 )
// keybd_event( 9, 0, 0, 0 )
// SendMessageA(l_handle,256,13,0)
//end if

rtn = DestroyWindow(l_handle)

na sendMessag ja ne vizu voobche ni kakoj reaksii,
vozmozno chto to ne tak pishu
mozno poluchit primer i zelatelno cifrofie znachenija WM_CLOSE and BM_CLICK
i isli mozno podrobnee pro nazatie na knopku

spasibo

почему то send не закрывает и возврашает 0
b конце концов у меня заработал цледующий вариант


l_handle = FindWindowA(0, gs_title_messagebox)

rtn = SetForegroundWindow(l_handle)
keybd_event( 9, 0, 0, 0 ) //tab
keybd_event( 9, 0, 2, 0 )
keybd_event( 13, 0, 0, 0 ) //enter
keybd_event( 13, 0, 2, 0 )

спасибо

это большая апликациа
такие мысли были , но проще не менять