stringgrid и CheckListBox

[Felonalex]

На форме есть stringgrid и CheckListBox(со списком параметров)
Подскажите как реализвать так что бы при выборе в CheckListBox листе строки (т.е перевод ее в положение Checked true) в stringgrid добавлялся столбец, а при Checked false удалялся.
Вот я немного че сам надумал

procedure TForm2.CheckListBox1ClickCheck(Sender: TObject);
var
k:integer;
begin
for k:=0 to CheckListBox1.Items.Count - 1 do
 if CheckListBox1.Checked[k]=true then
 begin
 stringgrid1.ColCount:=stringgrid1.ColCount+1;;
 StringGRid1.Cells[stringgrid1.ColCount,0]:=CheckListBox1.Items[CheckListBox1.ItemIndex];
 end;
 end;

Неужели ни кто не может помоч?

[Stilet]

http://www.programmersforum.ru/showthread.php?t=23863
http://www.programmersforum.ru/showthread.php?t=66279

[Bit_Man]

Я из protected

	virtual void __fastcall DeleteColumn(int ACol);
        virtual void __fastcall DeleteRow(int ARow);

перетащил в public. все работает ничего не полетело.

[Felonalex]

да не совсем то , как описать программно чтобы при чекеде труе определенного парметра добавлялся столбеца при отжатии его удалялся именно этот столбец.