zapisanie zaznaczeń w CheckBoxList

a co tam zapytam się mistrzów :D

poradziełem sobie z zapisaniem pozycji dużej ilości ChecBoxów, ale nie mam dobrego pomysłu na zrobienie tego z CheckBoxList`ami.

PS chodzi mi o duże ilości, wszelkie pomysły nawet te głupie mile widziane :D

to zapisuj w zaleznosci od zaznaczenia 1 albo 0 w binarce :)

masz 8 checkboxow w jednym bajcie.

//troche glupio to napisales - bo w tresci jest o pozycje, a w temacie o zaznaczenie

i'am confused

:P chodzi mo o zaznaczenia checkboxy zapisywałem w taki sposób jak Ty napisałeś, a na ChechListBox chciałem wymyślić jakiś ciekawszy sposób

var
    F : file of boolean;
    i : integer;
    Zmienna : boolean;
begin
    AssignFile(F, 'd:\plik.dat');
    Rewrite(F);
    for i := 0 to CheckListBox1.Items.count - 1 do begin
        if CheckListBox1.Checked[i] then Zmienna := true
        else Zmienna := false;
        Write(F, Zmienna);
    end;
    CloseFile(F);
end;

Nie testowałem, ale powinno działać na naprawdę duże ilości... :-P

Nie testowałem, ale powinno działać na naprawdę duże ilości... :-P

chodziło mi o dużą ilość komponentów, a nie itemów, :D - ten sposób robiłem do zapisu checkboxów :D

Jeśli chodziło ci o dużą ilość komponentów CheckBoxList, to użyj jeszcze jednej pętli, ComponentCount oraz słówka

as

.