Pedido de ajuda na utilização da ComboSearchBox

Fernando Almeida · Mensagem por **Fernando Almeida** » 18 Mar 2023 01:32

Boa noite caros colegas, venho desta forma pedir a vossa ajuda porque não consigo corrigir este erro que me aparece ao usar a comboSearchBox.
está tudo a fucnionar como pretendo, na escolha da primeira vez, eu confirmo e ele avança e não dá erro, mas quando volto e mantanho o valor e dou enter, funciona, mas se tento alterar o valor que ele me apresenta na combo para uma opção nova e primo o enter dá o seguite erro:

Erro: HMG 3.4.4 Estável (32 bits)
Janela: frmaSegur já definido. Programa encerrado
Chamado de _DEFINEMODALWINDOW(4597)
Chamado de CREATECSBOX(195)
Chamado de (b)_DEFINECOMBOSEARCHBOX(104)
Chamado de _DOCONTROLEVENTPROCEDURE(6056)
Chamado de EVENTS(1861)
Chamado de SETWINDOWTEXT(0)
Chamado de _SETVALUE(536)
Chamado de SETPROPERTY (7931)
Chamado de _CSITEMSELECTED(301)
Chamado de (b)CREATECSBOX(215)
Chamado de _DOCONTROLEVENTPROCEDURE(6056)

ou seja, diz que a frmasegur já definida e encerra a aplicação.

uso da seguinte forma.

Código: Selecionar todos

DEFINE ComboSearchBox aSegur
        ROW    24
        COL   176
        WIDTH 285
		HEIGHT 23
        FontName "Courier"
        FontItalic .f.
        FontBold .t.
        FontColor {0,0,220}
        BackColor {255,255,220}
        Items aPergunta
		ON GOTFOCUS {|| IniciaComboBox() }
		ON ENTER {|| IF(!Empty(This.Value) .AND. EditaPergunta, flgAcresceLn :=VERIFICAVAR( flgAcresceLn, oCript ), FormSeg.TXT_Resposta.SetFocus) }
		ON LOSTFOCUS {|| IF(!Empty(This.Value), flgAcresceLn :=VERIFICAVAR( flgAcresceLn, oCript ), FormSeg.TXT_Resposta.SetFocus) }
		AnyWhereSearch .f.
        Additive .t.
        RowOffSet 50
        ColOffSet 0
 END ComboSearchBox

Já procurei essa variavel e não a consigo encontrar.

Aproveito e peço desculpa mas como já não uso esta ferramenta vossa para pedir auxilio a muito tempo, tavez não esteja a apresentar o problema da forma certa.
Se for possível da vossa parte me indiquem como devo fazer da forma certa.
Agradeço a vossa compreensão.

Gostaria tambem de tirar umas duvidas sobre a linguagem porque estou um pouco apreensivo em relação ao comportamento dela.
Primeira pergunta é a seguinte, quando linko o trabalho e o executo o form da venda demora a abrir uns 4 a 5 segundos, mas após eu abrir umas 4 o 5 vezes esse mesmo form, ele começa a abrir rápido, quase instantaneamente. Isso é normal ?
Aproveito e pergunto sobre o consumo de RAM, o executável após a chamada, eu vou consultar o gerenciador de tarefas e verifico que usa uns 5mb de RAM, mas quando eu abro os forms umas 5 vezes o mais ele já ocupa na memória uns 15 o mais mb. Eu continua a insistir no uso por exemplo do form de vendas simulando uma venda, eliminando uma linha, alterando outra e ao voltar ao gerenciador ele apresenta um consumo de uns 25mb. Pergunto se isto é normal ?
O curioso é que o IDE tambem vai aumentando o consumo de RAM com o uso.
Como ainda não tenho muita experiencia com esta linguagem gráfica, gostaria que me esclarecessem.