Ir para conteúdo
Fórum Script Brasil
  • 0

Problema No Comando


deio

Pergunta

estava eu testando meu programa e após ter feito algumas modificações, esse comando parou de funcionar no dbgrid :

private
procedure OnMessageOwn(var Msg: TMsg; var Handled: Boolean);
(...)
procedure TForm1.OnMessageOwn(var Msg: TMsg; var Handled: Boolean) ;
var i: SmallInt;
begin
if Msg.message = WM_MOUSEWHEEL then
begin
Msg.message := WM_KEYDOWN;
Msg.lParam := 0;
i := HiWord(Msg.wParam) ;
if i > 0 then
Msg.wParam := VK_UP
else
Msg.wParam := VK_DOWN;
Handled := False;
end;
end;[/codebox]

Link para o comentário
Compartilhar em outros sites

2 respostass a esta questão

Posts Recomendados

  • 0
estava eu testando meu programa e após ter feito algumas modificações, esse comando parou de funcionar no dbgrid :

private
procedure OnMessageOwn(var Msg: TMsg; var Handled: Boolean);
(...)
procedure TForm1.OnMessageOwn(var Msg: TMsg; var Handled: Boolean) ;
var i: SmallInt;
begin
if Msg.message = WM_MOUSEWHEEL then
begin
Msg.message := WM_KEYDOWN;
Msg.lParam := 0;
i := HiWord(Msg.wParam) ;
if i > 0 then
Msg.wParam := VK_UP
else
Msg.wParam := VK_DOWN;
Handled := False;
end;
end;[/codebox]

não entendi nada, mas tenta usa pontos de interrupçao dai tu vai ver em que comando exatamente ta o erro.

Editado por *_Felipe_*
Link para o comentário
Compartilhar em outros sites

  • 0

Deio você precisa fazer uma verificação no seu código linha por linha, para isso clique na linha do código e precione a tecla F5, faça isso em todas essas linhas ai, quando fizer isso elas ficarão vermelhas, e ai é só compilar o seu sistema quando for o delphi for executar esses códigos marcados ele te mostrará a tela dos códigos novamente ai você vai precionando F9 e você vai descobrir em que linha está dando o erro.

Posta ela ai para nós depois.

Abraços

Alexandre

Link para o comentário
Compartilhar em outros sites

Participe da discussão

Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.



  • Estatísticas dos Fóruns

    • Tópicos
      152k
    • Posts
      651,7k
×
×
  • Criar Novo...