Fórum colorir palavras pesquisadas em um dbgrid #382241

Boa tarde pessoal, ai estou precisando de uma ajuda com um codigo aqui. tenho um dbgrid e um banco de dados em firebird. preciso fazer uma consulta no banco de dados, pegando todas as palavras digitadas, independente se forem maiusculas ou minusculas. bem consegui fazer isto indo no banco de dados e colacando o charset como 1252 e no collate win_ptbr, outra coisa é o campo se for do tipo blobo , não tem como fazer pois ele não contem o win_ptbr pelo menos no firebird. então tenho o seguinte . primeiro criei uma procedure (localizar)   procedure TFrm_localizar.localizar;
begin
with DM.qry_localizar do
begin
    close;
    sql.Clear;
    sql.Add(_sql);
    open;
end;
end;   depois no on chance do edit coloquei este codigo abaixo   procedure TFrm_localizar.Edit1Change(Sender: TObject);
var
tipo:string;  // declare esta variavel
begin if rbcomeca.Checked then  // este é um radio button que faz com que se localize as palavras começadas porletra                                                 //digitada no edit
 tipo:=Edit1.text + '%'
 else if rbcontem.Checked then  // este radio button localiza as palavras que contem as letras digitadas no edit                                                    // em seu meio.
 tipo:=  '%' + Edit1.text + '%'; _sql:= 'select * from  biblia   where texto LIKE' + quotedstr(tipo); localizar; // aqui a procedure criada
end;   ----------------------------------------------------------------- bem esta funcionando bem, quando localiza a palavra digitada ela traz todas as linhas que contem a palavra, ficou bem legal, agora o problema é : como conserto este codigo para ao trazer a linha na pesquisa, ela traga a palavra destacada em uma cor diferente, digamos vermelho, azul etc. se alguém puder ajudar agradeço, e aproveitem o codigo acima, pois está funcionando legal. sucesso a todos geraldo leal