Ребят подскажите мне нужно встроить в кнопку команду:возможность копирования из edit текст, и нажатием на другую автомотически сохранить в каком-нить txt...
к кнопке 1004-автомотически сохранить в каком-нить txt...
Код:
Код:
.386
.model flat, stdcall
option casemap :none ; case sensitive
include \masm32\include\windows.inc
include \masm32\include\user32.inc
include \masm32\include\kernel32.inc
include \masm32\include\gdi32.inc
includelib \masm32\lib\user32.lib
includelib \masm32\lib\kernel32.lib
includelib \masm32\lib\gdi32.lib
WndProc PROTO :DWORD,:DWORD,:DWORD,:DWORD
EnumKids PROTO :DWORD,:DWORD
EnumKids1 PROTO :DWORD,:DWORD
EnumKids2 PROTO :DWORD,:DWORD
buflen equ 102400
.data
fDone dd 0
hInstance dd 0
dlgname db "SNIFF",0
szSniff db "Hellow,Игорь Владимирович!",0
buffer db 512 DUP(?)
membuf2 dd ?
ClipBoard dd ?
textlen dd ?
currlength dd ?
.code
start:
invoke GetModuleHandle, NULL
mov hInstance, eax
invoke DialogBoxParam,hInstance,ADDR dlgname,0,ADDR WndProc,0
invoke ExitProcess,eax
WndProc proc hWin :DWORD,
uMsg :DWORD,
wParam :DWORD,
lParam :DWORD,
;hWnd :DWORD
LOCAL tmpFont :LOGFONT
.if uMsg == WM_INITDIALOG
invoke LoadIcon,hInstance,101
invoke SendMessage,hWin,WM_SETICON,TRUE,eax
invoke SetWindowPos,hWin,HWND_TOP or HWND_TOPMOST,NULL,NULL,NULL,NULL,SWP_NOSIZE or SWP_NOMOVE
invoke ShowWindow,hWin,SW_MINIMIZE
invoke ShowWindow,hWin,SW_NORMAL
invoke SetDlgItemText,hWin,1001,addr szSniff
xor eax, eax ;очищение регистра eax
ret
.elseif uMsg == WM_COMMAND
.if wParam == 1000
invoke GetDesktopWindow
invoke EnumChildWindows,eax,addr EnumKids,hWin
xor eax,eax
.endif
.if wParam == 1002
invoke ShowWindow,hWin,SW_NORMAL
invoke ShowWindow,hWin,SW_MINIMIZE
xor eax,eax
ret
.endif
.if wParam==1003
; invoke OPEN "I",#1,"C:\Users\Вячеслав\Desktop\kva.asm.TXT"
xor eax,eax
ret
.endif
.if wParam==1004
invoke GetDesktopWindow
invoke EnumChildWindows,eax,addr EnumKids2,hWin
xor eax,eax
ret
.endif
.elseif uMsg == WM_CLOSE
invoke ShowWindow,hWin,SW_MINIMIZE
invoke EndDialog,hWin,0
xor eax,eax
ret
.endif
xor eax, eax
ret
WndProc endp
EnumKids proc eHandle:DWORD,z:DWORD
invoke GetWindowLong,eHandle,GWL_STYLE ;проверка шрифта в окне EDIT
.if (eax & ES_PASSWORD) ;
invoke SendMessage,eHandle, EM_SETPASSWORDCHAR, 0, 0
invoke GetStockObject,SYSTEM_FIXED_FONT
invoke SendMessage,eHandle,WM_SETFONT,eax, 0
invoke InvalidateRect,eHandle, NULL, FALSE
.endif
mov eax,eHandle
ret
EnumKids endp
EnumKids1 proc eHandle:DWORD,z:DWORD
invoke GetWindowLong,eHandle,GWL_STYLE
invoke GetWindowText,eHandle,addr buffer,512
;.endif
mov eax,eHandle
ret
EnumKids1 endp
EnumKids2 proc eHandle:DWORD,z:DWORD
invoke GetWindowLong,eHandle,GWL_STYLE
invoke SetWindowText,eHandle,addr buffer
;.endif
mov eax,eHandle
ret
EnumKids2 endp
end start