LV.Data

[marabu]

Es geht noch besser...

Mit iFarbCode als Integer und sFarbName als string kannst du so vorgehen:

Delphi-Quellcode:

begin
  with ListView.Items.Add do
  begin
    // ...
    SubItems.AddObject(sFarbName, Pointer(iFarbCode));
  end;
end;

marabu