Trovare la riga corrente in Delphi TDBGrid

Question

C'è un modo per scoprire quale riga è corrente in un TDBGrid?

Answer 1

Non sono sicuro di aver capito la tua domanda, ma tenterò una risposta e forse puoi chiarire se questo non è ciò che stai chiedendo.

Poiché un TDBGrid è legato a un DataSource, la riga corrente è la stessa della riga corrente nell'origine dati. È possibile eseguire una query su DataSource, esaminando un valore di chiave primaria o la proprietà RecNo per determinare quale record è quello corrente.

Answer 2

Se non si desidera dipendere dall'origine dati per fornire un conteggio record e un record corrente (ad esempio perché si utilizza un cursore unidirezionale su un server remoto), quindi la tecnica di accesso alle proprietà del può essere utilizzato il controllo di rete sottostante.

Vedere this answer in una domanda StackOverflow simile.

Answer 3

Si può fare in questo modo:

1 - Definire una classe locale che è una copia di TDBGrid (questo vi permetterà di accedere metodi privati):

type 
    THackDBGrid = class(TDBGrid); 

2 - Poi si può lanciare alla classe definita a livello locale, e tirare da metodi privati ​​come in:

function TfrmMain.GetFieldValue(colnum : integer): string; 
begin 
    Result := THackDBGrid(grdMain).GetFieldValue(colnum); 
end; 

Oppure, per ottenere la riga #:

function CurrentRowNumber: integer; 
    Result := THackDBGrid(grdMain).Row; 
end; 

Questa tecnica è utile anche in altre situazioni, ma non posso rivendicare il credito. I got it from here.