Danke für deine Antwort stifflersmom
Wie soll das deiner Meinung nach ausschauen?
Ich habe in der TTable ein Data-Feld "HISTDATE" welches den Tabellenwert inne hat.
Soll ich nun ein GetText und SetText auf diesem Feld machen?
So sieht die Get-Funktion aus:
Code:
procedure TFrame_Base_Brick.UniTable_BrickHistHISTDATEGetText(Sender: TField;
var Text: string; DisplayText: Boolean);
begin
inherited;
Text := JulianToGregorian(FieldbyName('HISTDATE').asInteger); // Funktion gibt TDateTime zurück
end;
Ich habe einen var Text:String. Wie soll ich da jetzt einen DateTime-Wert reinschreiben?
...und dann gleiches Spiel mit SetText..
Code:
procedure TFrame_Base_Brick.UniTable_BrickHistHISTDATESetText(Sender: TField;
const Text: string);
begin
inherited;
end;