Vielleicht ist das in #7 nicht ganz klar formuliert gewesen:
Zitat:
Delphi-Quellcode:
procedure TListColumn.SetAlignment(Value: TAlignment);
begin
if (Alignment <> Value) and (Index <> 0) then
begin
FAlignment := Value;
...
end;
end;
Wenn der Index 0 ist, wird der Alignment-Setter von TListColumn gar nicht erst ausgeführt. Da bleiben wie bereits gesagt nur eine "Blindspalte" oder selbst zeichnen.