POPUP MENÜ KAPATMA

[MuhammedYasir]

(30-05-2021, Saat: 23:02)CesuR Adlı Kullanıcıdan Alıntı: Merhaba, dbgrid üzerinde popup menü ile ekle sil menülerini gösteriyorum.  Eğer dbgrid boş ise (veya ilgili data ) popup menudeki SIL kısmını kullanılamaz yapmak istiyorum. Fakat bir türlü bulamadım.
Dbgridin onmouse down olayına mı yazılmalı ?

Şu şekilde kullanmışım:

procedure TFSatis.DBGrid1ContextPopup(Sender: TObject; MousePos: TPoint;
 var Handled: Boolean);
begin
 if (DMAlisSatis.SatisDetayIBQ.RecordCount > 0) Then
   SatrSil1.Visible := true
 else
   SatrSil1.Visible := false;

end;