TListView - Spaltengröße verändern, welches Ereignis

[K-Asche]

Hi@all,

welches Ereignis wird denn ausgelöst, wenn ich die Größe der Spalte verändere, d.h. diese oben im Saltenkopf größer ziehe?

Gruß

Karsten

[ichbins]

Garkeines? Ich hab alle Ereignisse durchprobiert, und keines hat irgendwas gemeldet... du musst mit einem Timer überprüfen ob sich was geändert hat.

[K-Asche]

Danke, werd ich morgen mal ausprobieren

[ichbins]

so inetwa:

Delphi-Quellcode:

var
  columns:array of integer;

procedure TForm1.Timer1Timer(Sender: TObject);
var
  i:Integer;
  thesame:boolean;
begin
  thesame:=false;
  try begin
    for i:=0 to listview1.Columns.Count-1 do
      if listview1.Columns.Items[i].width<>columns[i] then
        raise exception.Create('Unterschied');
    thesame:=true;
  end except end;
  setlength(columns,listview1.Columns.Count);
  for i:=0 to listview1.Columns.Count-1 do
    columns[i]:=listview1.Columns.Items[i].Width;
  if not thesame then
  begin
    //Aktion
    showmessage('Hat sich verändert.');
  end;
end;