[firebase-br] Lentidao para montar menu

[DanielN]

Samuel,
tente atribuir nil para o evento OnChange do menu, no meu caso resolveu, 
tinha um evento nele e ele é chamado a cada vez que vc altera o menu

samuel ferreira escreveu:
> Ola
>
> uso fb 2.1 e d7.
>
> ja andei questionando e pesquisando, mas ainda nao cheguei a algo q me
> agrada. tenho o loop abaixo q le exatamente 174 registros (no meu teste).
> até a linha do 'while' é qs instantaneo, e depois do ultimo 'end', tb. o
> problema esta dentro do loop.
>
> eu tenho uma tabela onde eu 'guardo' o nome do componente de menu, e leio e
> libero o menu, conforme liberacao.
> esse loop demora qs 30 segundos. Interessante que depois do menu montado,
> nao existe lentidao em nenhum ponto. apenas para montar o menu.
>
>
> Se alguem tiver alguma ideia de como deixar mais rapido, eu agradeco,
>
> Samuel
>
>
> var
>         wMenu :TMenuItem;
>         wItemMenu, wPrograma :string;
>
>
>         while not dados.QryGeral.Eof do
>            begin
>               wPrograma := dados.QryGeral.fieldbyname('Programa').asstring;
>               wItemMenu := Copy(wPrograma,4,Length(wPrograma) - 3);
>               wMenu := TMenuItem(FindComponent(wItemMenu));
>               if wMenu <> nil then
>                  wMenu.Visible := True;
>               dados.QryGeral.next;
>            end;
> ______________________________________________
> FireBase-BR (www.firebase.com.br) - Hospedado em www.locador.com.br
> Para saber como gerenciar/excluir seu cadastro na lista, use: http://www.firebase.com.br/fb/artigo.php?id=1107
> Para consultar mensagens antigas: http://firebase.com.br/pesquisa
>
>