AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Datenbanken Delphi DBGrid "Zebra"-färben ohne Dataset.RecNo?

DBGrid "Zebra"-färben ohne Dataset.RecNo?

Ein Thema von bisenegger · begonnen am 6. Feb 2008 · letzter Beitrag vom 13. Feb 2008
Antwort Antwort
bisenegger

Registriert seit: 25. Okt 2006
Ort: Kriens
14 Beiträge
 
#1

DBGrid "Zebra"-färben ohne Dataset.RecNo?

  Alt 6. Feb 2008, 22:25
Datenbank: Pervasive • Version: 9.52 • Zugriff über: PDAC
Das Einfärben eines DBGrid wurde hier ausfürlich behandelt.

Aber alle Methoden greifen auf RecNo von Datasource zu.
Meine Datenbank liefert (im Query -1 und) im Datasource bei jedem Datensatz RecNo=0
Somit sind dann alle Zeilen eingefärbt.

Kann man wirklich nicht die aktuelle Zeilennummer des DBGrid's auslesen?

Beni

PS: Ich weiss das es Kompo's wie Infopower, Raise, etc.. zu kaufen gibt und steht hier nicht zur Diskussion
  Mit Zitat antworten Zitat
alzaimar
(Moderator)

Registriert seit: 6. Mai 2005
Ort: Berlin
4.956 Beiträge
 
Delphi 2007 Enterprise
 
#2

Re: DBGrid "Zebra"-färben ohne Dataset.RecNo?

  Alt 6. Feb 2008, 22:30
Ungetestet: Im OnPaint/OnDrawCell über die Koordinaten des Rechteckes, also in etwa so:
Zeilennummer := Rect.Top div MyGrid.RowHeight Keine Ahnung, ob es die Eigenschaft 'Rowheight' gibt, aber ich meine die Höhe einer Zeile. Über die Recno des Datensatzes ist es aber auch blöd, weil ja dann beim Scrollen die Zeilen alternierend eingefärbt werden. 1.Zeile = Reco:0 => Weiss, 1x scrollen: 1.Zeile = Recno:1 => grau...
"Wenn ist das Nunstruck git und Slotermeyer? Ja! Beiherhund das Oder die Flipperwaldt gersput!"
(Monty Python "Joke Warefare")
  Mit Zitat antworten Zitat
raiguen
(Gast)

n/a Beiträge
 
#3

Re: DBGrid "Zebra"-färben ohne Dataset.RecNo?

  Alt 7. Feb 2008, 13:39
Gaaaaanz sicher, dass das nicht funktioniert->
Code:
 if Odd((Sender as TDBgrid).DataSource.DataSet.RecNo) then ...
Soweit ich weiss, haben alle DataSet-Komponenten (auch die abgeleiteten..) die Eigenschaft RecNo
  Mit Zitat antworten Zitat
bisenegger

Registriert seit: 25. Okt 2006
Ort: Kriens
14 Beiträge
 
#4

Re: DBGrid "Zebra"-färben ohne Dataset.RecNo?

  Alt 12. Feb 2008, 19:31
Zitat von raiguen:
Gaaaaanz sicher, dass das nicht funktioniert->
Code:
 if Odd((Sender as TDBgrid).DataSource.DataSet.RecNo) then ...
Soweit ich weiss, haben alle DataSet-Komponenten (auch die abgeleiteten..) die Eigenschaft RecNo
Nun es geht nicht. Da bei einer SQL-Abfrage vom Client nicht immer alle Records vom Server abgeholt werden, sondern nur die, die der Client zur Anzeige oder Verarbeitung braucht.
Nun weiss der Client gar nicht wieviele Datensätze beim Server bereitliegen. (Dynamischer Cursor)
Und so hat die Eigenschaft RecNo 0 oder -1.
  Mit Zitat antworten Zitat
marabu

Registriert seit: 6. Apr 2005
10.109 Beiträge
 
#5

Re: DBGrid "Zebra"-färben ohne Dataset.RecNo?

  Alt 13. Feb 2008, 07:09
Hallo Beni,

PDAC unterstützt REcNo schon (PvTable), aber wahrscheinlich nicht mit jedem DataSet-Typ und vielleicht auch in Abhängigkeit von den sonstigen Einstellungen der Komponente (unidirektional?). Da müsste eigentlich etwas in der Dokumentation zu stehen.

Freundliche Grüße
  Mit Zitat antworten Zitat
Themen-Optionen Thema durchsuchen
Thema durchsuchen:

Erweiterte Suche
Ansicht

Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 03:06 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz