Vieles ausprobiert und überall die Tipps halfen nix.
Delphi-Quellcode:
SendMessage(ListView1.Handle, LVM_SETCOLUMNWIDTH, 0, MakeLong(aWidth, 0));
ListView1.Perform(LVM_SETCOLUMNWIDTH, 0, MakeLong(aWidth, 0));
ListView_SetColumnWidth(ListView1.Handle, 0, aWidth);
// Unit CommCtrl
Collumn 0 bis x sind ja eigentlich die Spalten von vsReport. (ob 0 wirklich auch für vsList gilt, weiß ich nicht, schien aber nicht so)
Für vsList half bei mir die Column -1 ( alle Columns? ), aber nicht alleine.
Erst das umschalten des ViewStyles brachte letzendlich erfolg.
Delphi-Quellcode:
ListView_SetColumnWidth(ListView1.Handle, -1, aWidth);
//hier die Liste befüllen
ListView1.ViewStyle := vsReport;
ListView1.ViewStyle := vsList;