Posts
vc provavelmente está executando algo no seu after scrow, que esta fazendo ele dar um loop e voltar ao after scrow, ai ele passa pela programação e continua passando no after, até dar um estouro de pilha na memória, que é o ´stack overfloow´, manda quais são as linhas de comando que está colocando no evento, pra mim analizar!!
IF (PageControl1.ActivePage = TabHabilidade) THEN
BEGIN
EdID_PRETENDENTESHABILIDADES.Text := C_PRETENDENTESHABILIDADES2.FieldByName(´ID_PRETENDENTESHABILIDADES´).AsString;
EdID_PRETENDENTESHABILIDADESEXIT(Self);
END;
Olha, se eu entendi direito, enquanto o PageControl1.ActivePage for igual ao TabHabilidade, ele vai ficar passando no after scroll sem parar, pois provavelmente o resultado sempre vai ser TRUE, então ele vai ficar passando até estourar a pilha e dar o erro (Stack overfloow), tente usar estes comandos no evendo on_keydown do seu pagecontrol1, talvez funcione da mesma forma e é um evento que não vai ficar passando sempre até vc mudar de page, ou tente no evento onclick do pagecontrol, espero ter ajudado.