yashar666
شنبه 04 فروردین 1386, 13:28 عصر
اینو بینید
c:=0;
var
bmp:TBitmap;
DCWindow: HDC;
c:byte;
cwnd:HWND;
begin
c:=c+1;
bmp := TBitmap.Create;
bmp.Height :=240;
bmp.Width := 320;
DCWindow :=GetDC(cwnd);
BitBlt(bmp.Canvas.Handle, 0, 0,320,240,DCWindow, 0, 0, SRCCOPY);
bmp.SaveToFile('pic\'+IntToStr(c)+'.bmp');
این تابع عکس میندازه ولی مثلا اگه میدیا پلیر باز باشه از صفحه اون عکس نمی دازه
چه تغییری باید بدم که از اون فرم مدیاپلر هم که در حال پخش عکس بنداره
c:=0;
var
bmp:TBitmap;
DCWindow: HDC;
c:byte;
cwnd:HWND;
begin
c:=c+1;
bmp := TBitmap.Create;
bmp.Height :=240;
bmp.Width := 320;
DCWindow :=GetDC(cwnd);
BitBlt(bmp.Canvas.Handle, 0, 0,320,240,DCWindow, 0, 0, SRCCOPY);
bmp.SaveToFile('pic\'+IntToStr(c)+'.bmp');
این تابع عکس میندازه ولی مثلا اگه میدیا پلیر باز باشه از صفحه اون عکس نمی دازه
چه تغییری باید بدم که از اون فرم مدیاپلر هم که در حال پخش عکس بنداره