StringGrid vertical (dikey) kaydırma

nosedive · Mesaj gönderen **nosedive** » 05 Ara 2006 11:58

ilerde arama yapacak arkadaşlara detaylı erişim olması için başlığı biraz geniş tuttum..

stringgridde şoyle bir sorun yaşıyorum...colcount değerim diyelim 20

mousenin ortasındaki yuvarlak vardır ya yukarı aşağı döndürürüsünüz web sayfalarında falan yukarı aşağı gezinmek için..Onu hareket ettirince sanıyorum bu default değeri aşıyor ve out of range hatası veriyor..

Gridden hangi olaydır bu ? yada bunun max min değerleri falan varsa nasıl atanır..yada o özelliği tamamen nasıl kapatırım..tamamen kapatmak asıl tercihim tabiki...

Teşk.

kadirkurtoglu · Mesaj gönderen **kadirkurtoglu** » 05 Ara 2006 12:02

mousenin ortasındaki yuvarlak vardır ya yukarı aşağı döndürürüsünüz

Scrooll dur hocam bahsetiğiniz. ilgili stringgrid scroll barını kaydırabilirsiniz. Mouse eventlerini bir inceleyin...

nosedive · Mesaj gönderen **nosedive** » 05 Ara 2006 12:15

ben tam anlatamadım sanırım

Scroolbar özelliği aktif zaten...normalde mouse ile scrollbarı alt ve üst oklarına basarak tabiki aşağı yukarı ilerleyebiliyorsunuz..

ama mousenin ortasındaki yuvarlağı çevirdiğiniz zaman sanıyorum çok fazla ilerleme oluyor ve grid index out of range hatası alıyorsunuz..

diyorumki o mousenin ortasındaki yuvarlağı çevirdiğimizde hangi olay gerçekleşir..ve onun max min değerlerini yada step aralıklarını ayarlayabilirmiyiz...veyahut o özelliği tamamen kapatabilirmiyiz...

Teşk.

kadirkurtoglu · Mesaj gönderen **kadirkurtoglu** » 05 Ara 2006 01:29

hocam bende anlamatadım galiba. mouse nin ortasındaki dalgaya scrooll denir. ve bu scrooll dediğimiz yuvarlak scrooll barı hareket ettirir. ne kadar hareket ettireceği denetim masası fare ayarlarında gizlidir.

nosedive · Mesaj gönderen **nosedive** » 05 Ara 2006 02:02

ben tekrar anlatamadım...

scrollbarın mouse ile nasıl ayarlandığı ile ilgilenmek istemiyorum..bu programı başka kullanıcılar kullanacak...onlara gidin tek tek scroll bar kaydırma adımlarını ayarlayın diyemem..

onun için girdde bu olay gerçekleşmesini iptal etmem lazım.. scrooll u oynattığınız anda hata alıyorsunuz..o denetim masasından ayarlasanız bile.. o yüzden ol olayı durdurmak istiyorum

Opt2000 · Mesaj gönderen **Opt2000** » 05 Ara 2006 02:51

Selam

Ufak bir karışıklık var. Mouse'un scroll yapma tekerine wheel (yani teker) denir. Sorununuzu çözer mi bilmiyorum, ama kadirkurtoglu'nun söylemek istediği Wheel mesajlarını yakalamanız ve gerekli kontrolleri yaptırmanız.

Kolay gelsin,
Bahadır Alkaç

nosedive · Mesaj gönderen **nosedive** » 05 Ara 2006 03:03

evet zaten sorum da o

Opt2000 · Mesaj gönderen **Opt2000** » 05 Ara 2006 03:19

Selam,

Eğer TStringGrid kullanıyorsanız, OnMouseWheelDown ve OnMouseWheelUp eventlerini kullanabilirsiniz. Buradaki Handled parametresini True olarak atadığınızda, sizin event fonksiyonu içine yazdığınız kodlar kullanılacak ve Wheel mesajının default fonksiyonu çalıştırılmayacaktır.

Eğer TDBGrid kullanıyorsanız, Mouse wheel için gerekli mesajları sizin yakalamanız gerekiyor. Mesajın tam adını hatırlamıyorum, yapmanız gereken TDBGrid'den yeni bir string grid türetmek ve class içine şu fonksiyonu ekleyip mesajı yakalamak

procedure OnMouseWheel(var msg:TMessage);message WM_MOUSEWHEEL;

Burada WM_MOUSEWHEEL kısmının adını tam hatırlamadığım için attım. Bunu Windows SDK Help dosyasından bulabilirsiniz.

Kolay gelsin,
Bahadır Alkaç

NOT: Bu arada büyük ihtimalle 3. parti bir mouse sürücüsü kullanıyorsunuz, çünkü benim denemelerimde TStringGrid ve TDbGrid bileşenlerinde bahsettiğiniz sorunla karşılaşmadım.

nosedive · Mesaj gönderen **nosedive** » 06 Ara 2006 10:25

TStringgrid kullanıyormuşum

şimdi dikkat ettim..bahsettiğiniz şekilde

Kod: Tümünü seç

procedure TFrmmain.StringGrid1MouseWheelUp(Sender: TObject;
  Shift: TShiftState; MousePos: TPoint; var Handled: Boolean);
begin
  Handled := true;
end;

yaparak sorunu hallettim