Ekran görüntüsü alma.

[Shou]

merhabalar aşağıdaki kod ile bilgisayarın ekran görüntüsünü alıyoruz ve c'ye kaydedıyoruz ama benim yapmak istediğim findwindow ile belirli ekranın görüntüsünü almak findwindow kullanmayı denedım ama hata veriyor yardımcı olursanız sevinirim.

Kod: Tümünü seç

procedure TForm1.Button1Click(Sender: TObject);
Const
{$j+} i : Integer = 0; {$j-}
var
  DCDesk: HDC;
begin
  DCDesk:=GetWindowDC(GetDesktopWindow);
  BitBlt(image1.Canvas.Handle, 0, 0, Screen.Width, Screen.Height,DCDesk, 0, 0,SRCCOPY);
  ReleaseDC(GetDesktopWindow, DCDesk);
  image1.Picture.SaveToFile('C:\' +inttostr(i)+'.JPG'); // C:'ye kaydeder.
  inc(i);
end;

Şöyle denedim,

Kod: Tümünü seç

DCDesk:=findwindow('Hesap Makinasi');

vs ama findwindow vs olmuyor başka yöntemimi var?

[SimaWB]

Öncelikle: "Hesap Makinasi" değil "Hesap Makinesi" olacak!

İkinci olarak FindWindow işinizi görür ama FindWindow'un 2 parametresi vardır: http://msdn.microsoft.com/en-us/library ... s.85).aspx
Dolayısıyla

Kod: Tümünü seç

DCDesk:=findwindow('Hesap Makinasi');

şeklinde nasıl derlediniz bilmiyorum.

Son olarak:

Kod: Tümünü seç

DCDesk:=GetWindowDC(FindWindow(nil, 'Hesap Makinesi'));

şeklinde yaparsanız çalışır.

[Shou]

Dediğiniz gibi yaptım ama masa üstünü görüntüsünü alıyor, hesap makinesinin almıyor?

[SimaWB]

Delphi XE + Windows 7 x86'da denedim, çalışıyor.

[Shou]

Merhaba arkadaşlar rahatsız ediyorum ekran görüntüsü alırken resmin sol veya sağ alt köşesine yazı ekleme gibi şansımız var mı?

Ve bu resmin ortasına yazı ekleyip transparan şekilde yapabilirmiyiz yani editlense bile yazı orada kalsın istiyorum.

Örnek, sahibinden.com vb siteler'de resim yüklersek ortasına yazıyorlar.

Yardımcı olursanız sevinirim, teşekkürler.

[notname]

picture canvas olaylarına giricen kardeş. basit bişey. googleda ara picture.canvas.textout gibi bişey olması lazım

[fesiharslan]

Merhaba;
Bu konuda daha önce paylaştığımız bir bilginin linki:
viewtopic.php?f=36&t=35772&p=193014&hil ... as#p192846
İyi çalışmalar...

[Shou]

Merhaba;
Bu konuda daha önce paylaştığımız bir bilginin linki:
viewtopic.php?f=36&t=35772&p=193014&hil ... as#p192846
İyi çalışmalar...

Teşekkür ederim.

[greenegitim]

Peki ekran görüntüsün alırken ekranın tamamını almak istediğimizde başlat menüsü altaki saat v.s görünmesini istediğimizi varsayalım iki veya daha fazla monitör bağlı ise hangi ekranda çalıştığını ve sadece o ekranın görüntüsünü almayı nasıl yapabiliriz.