Ich sehe endich Licht am Ende des Tunnels
Der Quellcode von deinem Link funktioniert zwar nicht wie gewünscht, aber ich hab daraus einfach folgendes gebaut, was funktioniert:
Delphi-Quellcode:
for i := 0 to dbgMaster.Columns.Count -1 do
begin
Spalte := dbgMaster.Columns[i];
Spalte.Width := Round(dbgMaster.Width/3); //3 wegen 3 vorhandenen Spalten
end;
for i := 0 to dbgSlave.Columns.Count -1 do
begin
Spalte := dbgSlave.Columns[i];
Spalte.Width := Round(dbgSlave.Width/3);
end;
dankeschön
