arkadaşlar mause yerinde sabit kalırsa bir şey yapmayan hareket etiği anda 2 sn de bir ekran resmini alan bir küçük program yapmam lazım.
form üzerindeki mause kordinatlarını kullanarak değil program taskbarda açık olsa bile mause hareketini algılayıp resim çekecek.
özellikle mause hareketini algılama konusunda takıldım yardımcı olabilecek var mı
saygılarımla
mause hareket ederse r2 sn de bir resim kaydeden prg.
Forum kuralları
Forum kurallarını okuyup, uyunuz!
Forum kurallarını okuyup, uyunuz!
-
- Üye
- Mesajlar: 83
- Kayıt: 28 Ara 2017 04:14
- İletişim:
-
- Üye
- Mesajlar: 83
- Kayıt: 28 Ara 2017 04:14
- İletişim:
Re: mause hareket ederse r2 sn de bir resim kaydeden prg.
FormMouseMove eventine bir integer değişken atadım mause hareket ettikçe +1 yapıyor yani mause hareket ettikçe değişkenin değeri artıyor bir timer ile değişkenin değerini başka bir değişkenle kontrol ediyorum değişkenin değeri sabit kalınca resim çekme timer durduruyor değer yükselince resim çekmeye devam ediyor tek sorun form üzerinde çalışıyor programı task bara alınca resim çekme duruyor
veya form üzerindeki diğer elemanların üzerine gelince duruyor
veya form üzerindeki diğer elemanların üzerine gelince duruyor
Re: mause hareket ederse r2 sn de bir resim kaydeden prg.
forma Timer koy. 200ms lik olabilir. OnTimer içerisine aşağıdaki kodu yapıştırabilirsin.
Yukarıdaki kod mousenin her yerdeki koordinatını verir.
Kod: Tümünü seç
procedure TForm3.Timer1Timer(Sender: TObject);
var
MausPos: TPoint;
begin
GetCursorPos(MausPos);
Caption :='X Koord : ' +IntToStr(MausPos.x) +'Y koord :'+ IntToStr(MausPos.y);
end;
-
- Üye
- Mesajlar: 83
- Kayıt: 28 Ara 2017 04:14
- İletişim:
Re: mause hareket ederse r2 sn de bir resim kaydeden prg.
teşekkürler hocam tam istediğim buydu saygılar sunarım