как можно сделать на асме так, чтобы перетаскивать форму можно было не только за её caption? Нашёл множество примеров на delphi, но для асма нигде нет.

| Сообщение посчитали полезным:

ну вот смотри. пример на delphi

procedure TForm1.FormMouseDown(Sender: TObject;
Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
begin
ReleaseCapture;
Perform(WM_SYSCOMMAND, $F012, 0);
end;

а на асме, в цикле WinMain, обрабатывай нажатие мыши на форме и пиши этот же код. тока заместо Perform(WM_SYSCOMMAND, $F012, 0);
будет что-то типа
invoke SendMessage,hWnd,WM_SYSCOMMAND,$F012,0

| Сообщение посчитали полезным:

BaGiE пишет:
нажатие мыши на форме
Т.е надо обработать сообщение MOUSEDOWN, но в инклуд файлах я его не нашёл (я пишу на fasm'е)

| Сообщение посчитали полезным:

Всё, нашёл! Надо обработать WM_LBUTTONDOWN.

| Сообщение посчитали полезным:

Теперь возник новый вопрос. Как обработать это сообщение например у bitmap'а, который находится на этой форме?

| Сообщение посчитали полезным:

[norwed] пишет:
Как обработать это сообщение например у bitmap'а,
У каждого объекта на форме, есть свой обработчик событий/сообщений. Для многих он стандартный, но всегда можно написать свой для спец-обработки, а все остальные сообщения передавать(если не задумано что-то "мерзкое") в стандартный. Это вообще-то азбука - читай книги.

| Сообщение посчитали полезным:

tundra37 пишет:
У каждого объекта на форме, есть свой обработчик событий/сообщений
Я знаю
Может кто-нибудь примерчик даст?

| Сообщение посчитали полезным:

Masm32

; Устанавливаем новый обработчик событий/сообщений
invoke SetWindowLong,hControlForBitmap,GWL_WNDPROC,ADDR NewProc
mov hOldProc,eax

NewProc Proc hControl:DWORD, Msg:DWORD, wParam:DWORD, lParam:DWORD
.if Msg == WM_LBUTTONDOWN

; Здесь обработчик WM_LBUTTONDOWN

.endif
invoke CallWindowProc,hOldProc,hControl,Msg,wParam,lParam
ret
NewProc EndP

;Возвращаем старый обработчик событий/сообщений
invoke SetWindowLong,hControlForBitmap,GWL_WNDPROC,hOldProc

-----
ЗЫ: истЕна где-то рядом, Welcome@Google.com

| Сообщение посчитали полезным:

Всем спасибо

| Сообщение посчитали полезным: