Hat sich erledigt... aber falls den fehler auch mal jemand hat: ich habe zwar keine Ahnung voran es liegt, aber wenn ich vorher nen ListView.clear mache dann gehts.
also so:
Delphi-Quellcode:
var
z,i,j:integer;
listView:TListView;
begin
for z := 0 to Screen.FormCount-1 do begin
for i:=0 to Screen.Forms[z].ComponentCount-1 do begin
if Screen.Forms[z].components[i] is TListView then begin
listView:=Screen.Forms[z].Components[i] as TListView;
for j:=0 to listView.Columns.Count-1 do begin
listView.clear;
listView.Columns[j].Caption:='Hallo';
end;
end;
end;
end;
end;