Zitat von
woki:
Hi,
ein kleiner Hinweis:
wenn in der
IDE mit dem Feldeditor keine persistenten Felder erzeugt werden, werden die zur Laufzeit dynamisch automatisch beim Offnen des Dataset, (TTAble, TQuery etc) erstellt.
Eigentlich muß man da von Hand nichts machen.
Grüsse
Woki
Jo, Danke. Hat mir weiter geholfen.
Leider hab ich noch ein Problem mit den Maske:
Delphi-Quellcode:
if (Tabelle.FieldByName(FeldName).DataType = ftInteger) or
(Tabelle.FieldByName(FeldName).DataType = ftSmallint) or
(Tabelle.FieldByName(FeldName).DataType = ftLargeInt) or
(Tabelle.FieldByName(FeldName).DataType = ftBCD) or
(Tabelle.FieldByName(FeldName).DataType = ftWord) or
(Tabelle.FieldByName(FeldName).DataType = ftFloat) then
begin
// Maske auf das Feld legen (Zum formatieren numerischer Felder)
if GridFelder.FieldByName('FORMATIERUNG').AsString <> '' then
TNumericField(Tabelle.FieldByName(FeldName)).EditFormat := GridFelder.FieldByName('FORMATIERUNG').AsString;
end;
Leider wird nichts formatiert
Der soll bei allen numerischen Feldern gucken ob in der Tabelle "Gridfelder" im Feld "FORMATIERUNG" ne Maske drin steht (0.00#.##) und wenn ja, diese Maske auf das Feld anwenden. Aber leider steht da nur z.b. "304" anstatt "304.00".