Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 1
  • 2
  • 3
  • 4
  • 5
DBGrid Detay Gösterilmesi.
#8
Örnek :
procedure TForm1.BitBtn1Click(Sender: TObject);
begin
 if (DBGrid1.DataSource.DataSet.Active) AND ( NOT DBGrid1.DataSource.DataSet.EOF ) then
 begin
   Showmessage( DBGrid1.DataSource.DataSet.FieldByName('M_Name').AsString );
 end;
end;



// Burası da button taşıma / görüntüleme kısmı
//-------------------------------------------------------
procedure TForm1.DBGrid1DrawDataCell(Sender: TObject; const Rect: TRect;
 Field: TField; State: TGridDrawState);
begin
 // Buton için uygun column/field hangisisye oraya odaklanacağız...
 if ( Field.FieldName ='Btn' ) then
 begin
   if ( Field.DataSet.RecordCount > 0 ) then
   begin
     // Kayıt Seçili ve Odaklı ise Butonu yerleştir.
     If ( (gdSelected in State) or (gdFocused in State) ) then
     begin
       BitBtn1.Height  := Rect.Bottom-Rect.Top +2;
       BitBtn1.Width   := Rect.Right -Rect.Left;
       BitBtn1.Left    := Rect.Left  + tDBGrid(Sender).Left + 1;
       BitBtn1.Top     := Rect.Top   + tDBGrid(Sender).Top;
       BitBtn1.Visible := True;
       BitBtn1.BringToFront;
     end;
   end;
 end;
end;



eeuxcmieyyv5wugihmio.gif
Saygılarımla
Muharrem ARMAN

guplouajuixjzfm15eqb.gif


Cevapla


Bu Konudaki Yorumlar
DBGrid Detay Gösterilmesi. - Yazar: OZCANK - 12-04-2019, Saat: 04:49
Cvp: DBGrid Detay Gösterilmesi. - Yazar: FiRewaLL - 12-04-2019, Saat: 08:43
DBGrid Detay Gösterilmesi. - Yazar: mrmarman - 12-04-2019, Saat: 08:53
DBGrid Detay Gösterilmesi. - Yazar: emrgln - 12-04-2019, Saat: 09:16
DBGrid Detay Gösterilmesi. - Yazar: mrmarman - 12-04-2019, Saat: 09:32
DBGrid Detay Gösterilmesi. - Yazar: adelphiforumz - 12-04-2019, Saat: 09:44
DBGrid Detay Gösterilmesi. - Yazar: mcuyan - 12-04-2019, Saat: 12:13
DBGrid Detay Gösterilmesi. - Yazar: mrmarman - 12-04-2019, Saat: 12:27
DBGrid Detay Gösterilmesi. - Yazar: FiRewaLL - 12-04-2019, Saat: 18:31
Cvp: DBGrid Detay Gösterilmesi. - Yazar: OZCANK - 15-04-2019, Saat: 06:50

Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
  DbGrid To Excel & DataSet To Excel yhackup 18 5.169 26-05-2020, Saat: 21:12
Son Yorum: onur balkan
  Delphi7 DBGrid'e sağ tık yaparak form açmak batuhann 6 430 18-04-2020, Saat: 22:17
Son Yorum: denizfatihi
  DBGrid Hücre Kontrolü OZCANK 16 1.090 03-04-2020, Saat: 17:36
Son Yorum: OZCANK
  Dbgrid Kolonlar arasında ENTER tuşu ile dolaşma Bay_Y 5 672 26-12-2019, Saat: 10:05
Son Yorum: Bay_Y
  DbGrid deki Kolon içindeki veri arama Esrefhan 4 850 13-12-2019, Saat: 23:30
Son Yorum: Esrefhan



Konuyu Okuyanlar: 1 Ziyaretçi