Hola,
Prueba con algo así:
Código Delphi
[-]
procedure TForm1.Button1Click(Sender: TObject);
begin
ListView1.Columns[0].Width := 100;
end;
Actualización: He leído al revés... como puede verse arriba:
Para que no pueda modificarse el ancho de las columnas de un "TListView" se me ocurre asignar el mismo valor tanto a la propiedad "MinWidth" como a la propiedad "MaxWidth" de cada columna.
Tal vez sea conveniente también que el valor de la propiedad "AutoSize" sea "True".