Itens do ChekListBox para Tabela.db

Tenho um formulario com um CheckListBox(Chek_Entrada), no qual ao clicar no radioButton(Rb1), ele leva todas as escolas que tenho cadastrada para o Chek_Entrada(isso tudo é feito em tempo de execussao).
Para isso criei a tabela geral(Tbl_Geral), para que ao escolher os itens desejados do Chek_Entrada, e ao clickar no botao OK, o sistema pegasse os itens selecionados do chekentrada e salvasse nos respectivos bancos(cada item do chekEntrada corresponde a um banco).
Usei o codigo descrito abaixo mas nao funciona, pois o sistema exibe a msg que o diretório nao existe, exibindo na mensagem o nome de uma tabela que nao foi criada.
Estou quase louco, pois tenho data para entregar esse sistema.
Obs. ele está sendo desenvolvido em delphi3. Qualquer coisa posso mandar por e-mail o codigo fonte e a mensagem de e-mail, para analize.
---------------------------
msn: jpxst@hotmail.com (conectado as tardes e noites)
---------------------------
Forte Abraço!
---------------------------Codigo----------------------------------------------

procedure TEntrada.Button1Click(Sender: TObject);

begin

if RB1.Checked = True Then
begin
Tbl_Geral.DatabaseName := ´Protocolo_Escolas´;
Tbl_Geral.TableName := IntToStr(Chek_Entrada.ItemIndex);
Tbl_Geral.Active := True;
Tbl_Geral.First;
Tbl_Geral.Insert;
Tbl_Geral.FieldByName(´Descricao´).AsString :=
Memo_Entrada.Text;
Tbl_Geral.Post;

end;
end;
[/img]