TField.Displaywidth umrechnen

[shmia]

aktuelle_breite_in_Pixel := DBGrid1.Columns.Items[0].Width;