In einem DBGrid andere Dinge anzeigen als drinstehen

[Der schöne Günther]

Ihr Profis habt das ja schon alle x mal gemacht : Ich lasse den Benutzer mit einem TDBGrid in einer Ergebnismenge wühlen. Ich möchte ihm allerdings in einer Spalte (Zahl) nicht das anzeigen was drinsteht, sondern den zehnfachen Wert.

Wo muss ich ansetzen? Ich kenne mich mit Datenbanken nicht aus, irgendwo habe ich den Terminus "Berechnete Felder" im Hinterkopf.

Ich finde auf dem TDBGrid nichts und nicht auf dem TDataSource nichts. Was übersehe ich?

[mm1256]

Bin zwar kein Profi...aber vielleicht reicht's trotzdem:

Delphi-Quellcode:

procedure TForm1.DBGridDrawColumnCell(Sender: TObject;
  const Rect: TRect; DataCol: Integer; Column: TColumn;
  State: TGridDrawState);
begin
  with (Sender as TDBGrid).Canvas do begin
    Column.Field.AsFloat...

  end;

[p80286]

select wert*10 from irgendwo oder

Pseudocode:xx.Cells[x,y].Text=inttostr(myquery.field[z].asinteger*10; (das geht natürlich mit TDBGrid nicht)

aber ich befürchte Du meinst etwas anderes.

Gruß
K-H

[Dejan Vu]

Du kannst:
1. Berechnete Felder erstellen. Dazu fügst Du in deinem TDatset-Derivar ein neues Feld ein, setzt den Modus auf 'calculated' und setzt das Feld im OnCalculate(Fields?)-Ereignis des TDataset à la 'myCalcField.AsInteger := random(20)';

2. Du erstellst Eventhandler für OnGetText/OnSetText für das Feld (blöde Idee)

3. Du überschreibst, wie mein Vorredner geschrieben hat, das onDraw-Event des Grids (auch nicht soooo toll, finde ich)

Fang mal mit calculated fields an. Ist praktisch. OnGetText/OnSetText verwendet man zum 'übersetzen' von Feldern (eher Transliteration).

[Der schöne Günther]

Zitat von p80286:

aber ich befürchte Du meinst etwas anderes.

Richtig, ich will ja nur die Anzeige anpassen. Arbeiten möchte ich natürlich mit den "echten" Daten.

Zitat von mm1256:

Bin zwar kein Profi...aber vielleicht reicht's trotzdem:

Danke für die Idee. Das wird sicher funktionieren, wäre aber mein letzter Ausweg. Es ist im Endeffekt genau was ich will, aber zwingt einem zum "Malen".

Zitat von Dejan Vu:

Berechnete Felder erstellen. [...]

Das wird es wohl werden. Was mich, so als Amateur, daran jetzt stört ist: Warum blähe ich die Ergebnismenge hier künstlich auf? Klar, das wird wahrscheinlich auf Client-Seite erst nachträglich drangedichtet werden (hoffe ich), aber mir ist das unsympathisch, dass da jetzt jeder drankommt.

Ich wollte eigentlich nur die Werte im DBGrid anpassen. Blöd dass der da nichts anbietet.

[himitsu]

Zitat von p80286:

(das geht natürlich mit TDBGrid nicht)

Dafür gibt es dort die Unterscheidung zwischen Value, EditValue und DisplayValue, wobei man den DisplayValue beliebig ändern kann.

[Der schöne Günther]

Was? Erkläre dich!
DisplayValue hört sich gut an, aber was hat es mit einem TDBGrid zu tun?

[Dejan Vu]

Zitat von Der schöne Günther:

Warum blähe ich die Ergebnismenge hier künstlich auf?

Tust Du ja nicht.

[Der schöne Günther]

Ich formuliere es anders herum: Ich fummele am TDataSet herum. Ich hätte erwartet, direkt den TDBGrid oder wenigstens das TDataSource anfassen zu können.

Wenn ich jetzt irgendeine Logik habe, die das TDataSet auswertet kann sie auch an die berechneten Felder dran die nur für die Anzeige verwendet werden. Finde ich, spontan, doof.

[Dejan Vu]

Ich würde das wirklich im TDataset machen. Die TDataSource ist ja nur ein Verteiler für Dinge, die mit den Daten passieren (events und so). Das Grid wäre wäre noch eine Möglichkeit, aber das TDBGrid bietet hier keine komfortable Möglichkeit.

Auf der Ebene, auf der Du dich bewegst (RAD mit datensensitiven Elementen), würde ich auch die 'rapid' Lösung nehmen, also die, die am schnellsten und direktesten mit dem geringsten Aufwand zu Ziel führt. Willst Du dagegen eine nachhaltige, erweiterbare, skalierbare und schießmichtot Lösung, dann könntest Du dir natürlich ein Viewmodel bauen, aber, WTF.