Datensatzmenge abfragen in Paradox 7

[Tarran]

Ich schon wieder und Hallole Delphianer,
Ich bin halt noch etwas unbeschrieben was Datenbanken angeht und so stellen sich mir doch ab und an Fragen :
Ich möchte in ein "Auslesedokument "2 Einträge automatisch bestimmen. Wenn ich dieses Dokument aufrufe sollte oben stehen dies ist Datensatz X von X..... Die Bestimmung der gesamt Menge hol ich mir wohl über

Code:

SELECT Max(idx.rows) FROM Tabellenname.db as idx inner join Tabellenname.db as obj on idx.id = obj.id 
WHERE ( obj.name = 'Table1')

Wie aber hole ich die Nr des aktuellen Datensatzes ???
oder geht das irgendwie in einem Codeaufruf ?
Gruss Tarran

[woki]

Nun,

da stellt sich doch gleich die Frage, was soll denn die Nummer des aktuellen Datensatzes überhaupt sein?

Grüsse
Woki

[BrunoT]

Hallo Tarran,

versuchs mal mit

Delphi-Quellcode:

  Label1.caption:=IntToStr(Table1.Recno)+' Datensätze von '+IntToStr(Table1.RecordCount);

mfg

BrunoT

[Tarran]

huhu

Zitat:

a stellt sich doch gleich die Frage, was soll denn die Nummer des aktuellen Datensatzes überhaupt sein?

Naja ich liste einige Daten aus dem Datensatz mit DBgrid auf ..beim Doppelklick auf eine Zeile kommt DER Datensatz auf einer " Ansichtsseite" in vollem Maß zur Anzeige. Dort sollte man danns ehen welcher Datensatz das ist ..
Bsp: Dies ist Datensatz Nr: 12 / 888
Gruß Tarran
@Bruno eben am Testen )) danke

[BrunoT]

Hallo Tarran,

Folgendes:

Die Zeile sollte in einem DB-Ereignis stehn, nicht im OnClick des Labels.

Mach mal folgendes:

Lege auf eine Form einen Label, eine TTable, eine TDatasource, ein DBGrid und einen DBNavigator. Trage bei dem Tabellennamen eine Tabelle ein. vebinde Tabelle, Datasource, DBGrid und DB-Navigator untereinander. Tabelle auf activ=True.

Dann kopiere in das OnShow-Ereignis der Form die Zeile:
Label1.caption:=IntToStr(Table1.Recno)+' Datensätze von '+IntToStr(Table1.RecordCount); und auch in das OnClick-Ereignis von Db-Navigator (die selbe Zeile).


dann geht es

mfg

BrunoT

[Sharky]

Zitat von BrunoT:

... und auch in das OnClick-Ereignis von Db-Navigator (die selbe Zeile). ...

Hai BrunoT,

anstelle des OnClick eines DB-Navigators würde ich lieber das .AfterScroll des TDataSet (TQuery oder TTable) nehmen.
Damit ist man unabhängig von dem Navigator

[BrunoT]

Hallo Sharky,

man kann alt werden wie ´ne Kuh und lernt immer noch dazu.

THX

BrunoT