selamu aleyküm...
cxGrid üzerinde HitTest uyguluyorum. MasterView de calisiyor fakat Detail ve Detail in Detail inde HitTest uygulatmayi basaramadim.
Yardimci olursaniz Duaciniz olurum...
Selam ve Dua ile.
cxGrid Detail HitTest
Forum kuralları
Forum kurallarını okuyup, uyunuz!
Forum kurallarını okuyup, uyunuz!
Gazete manşetleri
* DİKKAT :Lütfen forum kurallarını okuyalım ve uyalım...!
* Warez,crack vs. paylaşımı kesinlikle yasaktır.
hocam öncelikle ilginizden ötürü tesekkür ederim.
Bu kod Grid in Marter tablosunda calisiyor. Benim istedigim ise Detail tablosunda bunu calistirmak. Söyle ki, bir popup menü nün elemanlari eger ki detail tablo nun cell i üzerinde popup oluyor ise aktif olsun ve eger master üzerinde ise inaktif olsun. Bir cok örnege baktim hepsi master icin gecerli. Bu konuda yardimci olabilirseniz minnettar kalacagim...
Selam ve Dua ile...
Kod: Tümünü seç
procedure TfrmFirmalar.cxViewDblClick(Sender: TObject);
var
HitTest :TcxCustomGridHitTest;
cxPos :TPoint;
cls :Tobject;
begin
inherited;
cxPos := mouse.CursorPos;
cls := FindVCLWindow(cxPos);
WindowS.ScreenToClient(TcxGrid(TcxGridSite(Cls).Parent).Handle, cxPos);
HitTest := (Cls as TcxGridSite).GridView.ViewInfo.GetHitTest(cxPos);
if HitTest is TcxGridRecordCellHitTest then
begin
ShowMessage(TcxGridRecordCellHitTest (HitTest).Item.Name);
end;
Selam ve Dua ile...
Bu kodu master ve detay olan view in dbl clickine koyup denedinmi? Eğer olmuyorsa bana ufak bir örnek master detay hazırlayıp sıkıştır gönder bir inceleyeyim.ikra yazdı:hocam öncelikle ilginizden ötürü tesekkür ederim.
Bu kod Grid in Marter tablosunda calisiyor. Benim istedigim ise Detail tablosunda bunu calistirmak. Söyle ki, bir popup menü nün elemanlari eger ki detail tablo nun cell i üzerinde popup oluyor ise aktif olsun ve eger master üzerinde ise inaktif olsun. Bir cok örnege baktim hepsi master icin gecerli. Bu konuda yardimci olabilirseniz minnettar kalacagim...Kod: Tümünü seç
procedure TfrmFirmalar.cxViewDblClick(Sender: TObject); var HitTest :TcxCustomGridHitTest; cxPos :TPoint; cls :Tobject; begin inherited; cxPos := mouse.CursorPos; cls := FindVCLWindow(cxPos); WindowS.ScreenToClient(TcxGrid(TcxGridSite(Cls).Parent).Handle, cxPos); HitTest := (Cls as TcxGridSite).GridView.ViewInfo.GetHitTest(cxPos); if HitTest is TcxGridRecordCellHitTest then begin ShowMessage(TcxGridRecordCellHitTest (HitTest).Item.Name); end;
Selam ve Dua ile...
Kolay Gelsin...
Gazete manşetleri
* DİKKAT :Lütfen forum kurallarını okuyalım ve uyalım...!
* Warez,crack vs. paylaşımı kesinlikle yasaktır.