Pick Up Artist
New member
screen capture
אני עובדת עצות, כשאני מנסה לעשות את הפעולה אני מקבלת רק את הכפתור של הפורם וזה רק בלק מהתוכנות: Private Const WM_PAINT = &HF Private Const WM_PRINT = &H317 Private Const PRF_CLIENT = &H4& Private Const PRF_CHILDREN = &H10& Private Const PRF_OWNED = &H20& Dim rv As Long rv = PostMessage(FindWindow(vbNullString, "Form1"), WM_PAINT, Picture1.hdc, ByVal 0&) rv = PostMessage(FindWindow(vbNullString, "Form1"), WM_PRINT, Picture1.hdc, PRF_CHILDREN + PRF_CLIENT + PRF_OWNED)
אני עובדת עצות, כשאני מנסה לעשות את הפעולה אני מקבלת רק את הכפתור של הפורם וזה רק בלק מהתוכנות: Private Const WM_PAINT = &HF Private Const WM_PRINT = &H317 Private Const PRF_CLIENT = &H4& Private Const PRF_CHILDREN = &H10& Private Const PRF_OWNED = &H20& Dim rv As Long rv = PostMessage(FindWindow(vbNullString, "Form1"), WM_PAINT, Picture1.hdc, ByVal 0&) rv = PostMessage(FindWindow(vbNullString, "Form1"), WM_PRINT, Picture1.hdc, PRF_CHILDREN + PRF_CLIENT + PRF_OWNED)