A Delphi 7 hogyan nyomtassa ki a rekordok aktuális számát a címke dbgrid táblájában

DELPHI 7: Hogyan kell kinyomtatni a DBGrid tábla bejegyzések aktuális számát egy címkén

Hello mindenkinek. Srácok, nem lehetséges a címkén (és különösen a label2.text szövegben) megjeleníteni, hogy hány rekord jelenik meg a táblázatban. A táblázat különböző szűrései után kapott rekordok számát emeli ki, ezt a számot a szűrés alkalmazása után vagy a rekord törlése után kell frissíteni. akkor, ha a táblázat rekordjainak száma csökken vagy növekszik, ezért az alábbiakban bemutatott kód nem illeszkedik (mivel mindig ugyanazt a rekordot mutatja a táblázatban, # xA0, nem az aktuális rekordok száma):

label2.Caption: = "Megjelenített rekordok:" + IntToStr (datamodule2.table1.RecordCount);

Megpróbáltam és 2 opciót:

datamodule2.Query1.Active:= false;
datamodule2.Query1.SQL.Clear;
datamodule2.Query1.SQL.Add ("SELECT COUNT (*) AS" "COUNT" "FROM [ABONENT]");
datamodule2.Query1.Active:= TRUE;
label2.caption: = IntToStr (datamodule2.Query1.RecordCount);

- itt kerüli a hibát A kulcsszó érvénytelen használata. Token: FROM.

A tanár felajánlotta, hogy létrehoz egy hurkot, és abban, hogy kiszámolja az asztal megjelenített mezőinek összegét, ami nyitva van, hogyan lehet ezt legjobban csinálni? Még mindig finomítani ezeket a beállításokat?

Hát, próbáld meg
* .SQL.Text: = "SELECT * FROM MyTable";

majd * .RecordCount

Bár az adatbázis nincs felsorolva, és lehetőség van rá.

Egy táblát vagy lekérdezést újra kell nyitni a táblákban szereplő rekordok számának módosítása után, a csodák ritkán fordulnak elő.

Feladja, hogy nem úgy néz ki, mint az adatforrást
próbálja meg megnézni azt, amelyik a hálózathoz csatlakozik
label2.Caption: = "Megjelenített rekordok:" + IntToStr (DBGrid.DataSource.DataSet.RecordCount);


> az adatbázis nincs felsorolva, és lehetőség van rá.

ez igen ..
ott általában -1 lehet :)
egyes esetekben.

label2.Caption: = "Megjelenített rekordok:" + IntToStr (DBGrid.DataSource.DataSet.RecordCount);

- nem változtatta meg a helyzetet, az "a" példányban szereplő értékjelző csak az asztalokról a másikra történő áttérés és a szűrés után változik. # xA0, sajnos ugyanaz marad, bár a látható mezők száma változik.

label2.Caption: = "Megjelenített rekordok:" + IntToStr (DBGrid.DataSource.DataSet.RecordCount);

- nem változtatta meg a helyzetet, az "a" példányban szereplő értékjelző csak az asztalokról a másikra történő áttérés és a szűrés után változik. # xA0, sajnos ugyanaz marad, bár a látható mezők száma változik.

eljárás TDataModule2.DataSource1DataChange (Feladó: TObject;
# xA0; mező: TField);
kezdődik
ha a DataSource1.DataSet.RecNo<>-1 majd Form1.Label2.Caption: = Formátum ("Records :.", [DataSource1.DataSet.RecordCount]);
végén;


> hány rekord jelenik meg a táblázatban

Nyilvántartás az ND 100-ban, de a rácsban jelenleg csak 20 látható.
A DataLink segítségével el lehet érni, van valami típusú megjelenítés

Memória: 0,73 MB
Hossz: 0,029 másodperc

Kapcsolódó cikkek