DisplayFormat während der Laufzeit zuweisen

[eddy]

Hallo Xaver,

vielen Dank für Deinen Tip. Natürlich habe ich es gleich ausprobiert, aber ich kriege immer nur die Fehlermeldung: Exception der Klasse EAccessViolation ist aufgetreten.

Um irgendwelche Format-Fehler auszuschließen, habe ich eine Tabelle mit den bereits im OI definierten Objekten TabArtInvBestand und TabArtBestand vom Typ TFloatField verwendet. Die Fehlermeldung war identisch.

Delphi-Quellcode:

  for i := 0 to TabArt.FieldCount - 1 do begin
    s := TabArt.FieldDefs.Items[i].Name;
    if s = 'Bestand' then begin
      case TabArt.FieldDefs.Items[i].DataType of
        ftFloat : begin
          TFloatField(TabArt.FieldDefs.Items[i]).DisplayFormat :=  
                                     TabArtInvBestand.DisplayFormat;

// TFloatField(TabArt.FieldDefs.Items[i]).DisplayFormat := '#,##0.00'; 

        end;
      end;
    end;
  end;

Definiere ich im OI TabArtBestand ist auch die Zuweisung:

  TabArtBestand.DisplayFormat := '#,##0.0000'; während der Laufzeit fehlerfrei.

Solltest Du, oder ein anderer Delphi-Wissender, noch eine Idee haben, dann bitte her damit!

mfg
eddy