Client Ekran Görüntüsünü Almak

[mapper]

 Selam Arkadaşlar,

 

Hepinize iyi çalışmalar diliyorum. Klasik delphi uygulamalarımızda olduğu gibi ekranın tamamı veya bir bölgesinin resmini alabiliyoruz.

 

Unigui ile bir deneme yapayım dediğimde, resim alınıyor fakat server ekranından alınıyor

 

Amacım client'in kendi ekranını almak olduğu halde yazdığım fonksiyon server'da çalışıyor.

 

Bir çözüm önerisi olan varmı?

 

Teşekkürler. 

 

...button.click(...)

 

 var   vJpg: TJpegImage;

        vBmp: TBitmap;

   ResimDosyaAdi : String;

begin

                    vBmp := TBitmap.Create;

                    try

                      ResimKap(vBmp);

                      vJpg := TJpegImage.Create;

                      try

                        vJpg.Assign(vBmp);

                        vJpg.CompressionQuality := 85; // JPG 85%

                        ResimDosyaAdi :='files/'+inttostr(Random(1000000))+'.jpg';

                        vJpg.SaveToFile(ResimDosyaAdi); //save format JPG

                        Resim.Picture.LoadFromFile(ResimDosyaAdi);

                      finally

                        vJpg.Free;

                      end;

                    finally

                     vBmp.Free;

                    end;

                DeleteFile(ResimDosyaAdi);

 

end;

 

 

procedure TAnaForm.ResimKap(ABitmap: TBitmap);

var

  vDesktopDC: HDC;

begin

  vDesktopDC := GetWindowDC(URLFrame.Handle);

  try

      ABitmap.PixelFormat := pf24bit;

      ABitmap.Height := URLFrame.Height;

      ABitmap.Width := URLFrame.Width;

      BitBlt(ABitmap.Canvas.Handle,0, 0 , URLFrame.Width, URLFrame.Height, vDesktopDC, URLFrame.left, URLFrame.top, SRCCOPY);

   finally

    ReleaseDC(GetDesktopWindow, vDesktopDC);

  end;

end;

 

[mehmet07]

http://stackoverflow.com/questions/28721188/how-to-capture-screen-shot-with-extjs-button

Burada mümkün olmadığını söylüyor.

 

ama bunu bir deneyin demiş.

http://html2canvas.hertzen.com/

[mapper]

Teşekkürler Mehmet Bey,

 

Resim almak derken uygulama dışındaki bir sayfayı kasdetmedim.

 

Çalışan uygulamamızın ekran görüntüsünü alma işlemi gerekiyor.

[sobakava]

http://stackoverflow.com/questions/4912092/using-html5-canvas-javascript-to-take-screenshots