Mouse un kaç metre yol aldığını öğrenmek

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Cevapla
Kullanıcı avatarı
turkerunutmaz
Üye
Mesajlar: 57
Kayıt: 04 Oca 2008 04:53
Konum: İstanbul
İletişim:

Mouse un kaç metre yol aldığını öğrenmek

Mesaj gönderen turkerunutmaz »

Merhaba. Ben mouse un kaç metre yol aldığını öğrenmek istiyorum.Aklıma gelen timer ile yapmak oldu ama intervali çok düşük yapmak lazım ki doğru veriyi alabilelim. Ben kaç pixel yer değiştirdiğini bularak yapmayı düşündüm ama bunu nasıl metreye çevirebiliriz?Ya da daha mantıklı bir yöntem var mıdır?
ng
Üye
Mesajlar: 192
Kayıt: 01 Mar 2004 11:49
Konum: Bursa
İletişim:

Re: Mouse un kaç metre yol aldığını öğrenmek

Mesaj gönderen ng »

mouse mesajlarını hook ederek farenin hangi yöne kaç piksel gittiğini takip edebilirsin.
Kullanıcı avatarı
turkerunutmaz
Üye
Mesajlar: 57
Kayıt: 04 Oca 2008 04:53
Konum: İstanbul
İletişim:

Re: Mouse un kaç metre yol aldığını öğrenmek

Mesaj gönderen turkerunutmaz »

tamam buraya kadar sorun yok. Ama pixeli nasıl metreye veya mm ' e çeviricem?
Ekran çözününrlüğüne göre değişiyormuş sanırım.Net bir sonuç yokmuş.
Kullanıcı avatarı
sabanakman
Kıdemli Üye
Mesajlar: 3077
Kayıt: 17 Nis 2006 08:11
Konum: Ah bi Antalya olaydı keşke (Ankara)

Re: Mouse un kaç metre yol aldığını öğrenmek

Mesaj gönderen sabanakman »

Başka bir forumdan alıntıdır.

Kod: Tümünü seç

function PxToCM(dPixel:integer): Extended;
Const
  Inch:Real=2.54;
begin
  PPI:=Screen.PixelsPerInch ;
  Result := (dPixel div PPI) * Inch ;
end;
Şaban Şahin AKMAN
_________________
Derin olan kuyu değil kısa olan iptir. - .
Kullanıcı avatarı
turkerunutmaz
Üye
Mesajlar: 57
Kayıt: 04 Oca 2008 04:53
Konum: İstanbul
İletişim:

Re: Mouse un kaç metre yol aldığını öğrenmek

Mesaj gönderen turkerunutmaz »

teşekkür ederim.
Kullanıcı avatarı
turkerunutmaz
Üye
Mesajlar: 57
Kayıt: 04 Oca 2008 04:53
Konum: İstanbul
İletişim:

Re: Mouse un kaç metre yol aldığını öğrenmek

Mesaj gönderen turkerunutmaz »

sanırım yanlış değer gösteriyor. integer değerleri extended yaptım tam olarak elde eiyim diye fakat düzgün çalışmadı.
Benim çözünürlük 1280*960, paint te bu genişlik ve yükseklikte boş sayfa açtım öznitelklerden kaç cm olduğuna baktım ama programdaki ile verilen sonuç tutmadı.
Cevapla