Witam kolegów.
Zatrzymałem się ostatnio nad niby błahym problemem.
Otóż w konfiguracji (pod postacią string) trzymam listę składników które chcę wyświetlić w ListView.
Problem polega na tym że w jednym stringu trzymam konfigurację dla 4 kolumn.
Wygląda to tak:
str := 'aa1,aa2,aa3,aa4; bb1,bb2; cc1; dd1';
składniki są oddzielone przecinkami, a poszczególne kolumny średnikami
Na formie mam 1 ListView, i naciskając buttony od 1 do 4 chciałbym wyświetlać konfigurację dla danej kolumny.
Wydawało mi się że zrobię to tak:
str1,str2,str3,str4 : TListItems;
{w onCreate}
str1 := TListItems.Create(ListView1);
str2 := TListItems.Create(ListView1);
str3 := TListItems.Create(ListView1);
str4 := TListItems.Create(ListView1);
ListView1.Items := str1;
procedure TForm1.sbtnKol1Click(Sender: TObject);
begin
ListView1.Items := str1;
end;
procedure TForm1.sbtnKol2Click(Sender: TObject);
begin
ListView1.Items := str2;
end;
i tak dalej
ale niestety to nie działa, tak jak należy. Po wczytaniu listy do ListView wyświetla się kofiguracja dla 1 kolumnu, al;e po naciśnięciu 2 buttona i następnie 1 buttona lista jest wyczyszczona.
Czy możecie podpowiedzieć jak to zrobić ?, ewentualnie gdzie robię błąd ?