TDatefield, nur Jahreszahl anzeigen und übergeben

[Trafel21]

Hallo zusammen,

ich hab gerade ein verzwicktes Problem. Ich hab in der Datenbank ein DATE Feld welches ich nicht in ein Integer-Feld umändern kann.
Ich möchte über DBEditbox in Delphi nur die Jahreszahl übergeben und auch nur darstellen. in der Datenbank sollte dann 01.01."2018" gespeichert werden.

In Delphi (DataSet) ist es wie folgt definiert:
IBANSCHAFFUNGSDATUM: TDateField;

Würdet ihr die Logik in einen Trigger schreiben? oder in Delphi das 01.01. hinzufügen? Ich hab schon mehreres versucht. SetText, OnChange... irgendwie funktioniert nichts so wirklich.
Vielleicht gibt es einen eleganteren Weg, den ich noch nicht kenne? x.x

[mkinzler]

Nimm doch einfach eine normales Editfeld und formatiere die Anzeige.

[p80286]

Zitat von Trafel21:

Ich hab in der Datenbank ein DATE Feld welches ich nicht in ein Integer-Feld umändern kann.

Warum kannst Du das nicht?
Wird das Feld durch eine andere Anwendung mi einem vollständigen Datum genutzt?
Kennt deine DB "ALTER" nicht?

Und ansonsten sollte man tunlichst die Finger von DB-Komponenten lassen, vor allem wenn man Anforderungen hat, die etwas abseits des Mainstreams liegen.

Gruß
K-H

[Trafel21]

Zitat von p80286:

Zitat von Trafel21:

Ich hab in der Datenbank ein DATE Feld welches ich nicht in ein Integer-Feld umändern kann.

Wird das Feld durch eine andere Anwendung mi einem vollständigen Datum genutzt?

Genau deswegen. :/

Zitat von mkinzler:

Nimm doch einfach eine normales Editfeld und formatiere die Anzeige.

Werde ich mal so versuchen, vielen dank.

[dataspider]

Ich würde hier in der DB einen View anlegen.

Ein berechnetes Feld
extract(year from fibanschaffungsdatum) as fibanschaffungsjahr...
...und das Schreiben im before update trigger der View.

Dann hast du im Dataset ein Interger - Feld und kannst dir das ganze Gefummel in Delphi sparen...

Frank

[Trafel21]

Zitat von dataspider:

Ich würde hier in der DB einen View anlegen.

Ein berechnetes Feld
extract(year from fibanschaffungsdatum) as fibanschaffungsjahr...
...und das Schreiben im before update trigger der View.

Dann hast du im Dataset ein Interger - Feld und kannst dir das ganze Gefummel in Delphi sparen...

Frank

vielen Dank!

Wäre es evtl. auch mit einem weiteren FEld möglich? Sowas wie

ALTER TABLE STAMM
ADD HERSTELLUNGSDATUM_JAHR COMPUTED BY ((EXTRACT(YEAR FROM STAMM.HERSTELLUNGSDATUM ))

... und im IB Stamm das schreiben mit update trigger ?

[dataspider]

Zitat von Trafel21:

Wäre es evtl. auch mit einem weiteren FEld möglich? Sowas wie

ALTER TABLE STAMM
ADD HERSTELLUNGSDATUM_JAHR COMPUTED BY ((EXTRACT(YEAR FROM STAMM.HERSTELLUNGSDATUM ))

... und im IB Stamm das schreiben mit update trigger ?

Das mit dem Trigger funktioniert auf berechente Felder der Tabelle leider nicht.
Geht IMO nur über View...

Frank