Ergebnis der Suchanfrage

• Forum: Win32/Win64 API (native code)

  AW: Wie Fehler suchen: WM_MouseWheel nicht in WindowProc()

   
    by Schwedenbitter, 6. Sep 2010
  Ich habe die Lösung gefunden :duck:
  Ich suche seit mehreren Tagen nach der Lösung und hatte auch das hier bereits angesehen. Ich hatte mich wohl vom Suchen des Controls blenden lassen und damit das hier nicht hinbekommen:procedure TChat.Create(Sender: TObject);
  begin
  Application.OnMessage:=MessageHandler;
  ...
  end;
  
  procedure TChat.MessageHandler(var Msg: tagMSG; var Handled: Boolean);...
• Forum: Win32/Win64 API (native code)

  AW: Wie Fehler suchen: WM_MouseWheel nicht in WindowProc()

   
    by Schwedenbitter, 6. Sep 2010
  Danke Euch für die schnellen Antworten:
  
  Ich hatte Form.OnMouseWheel bereits am Start. Allerdings würde ich gern das Scrollverhalten von TRichEdit 1:1 kopieren. Dazu gehört eben auch, dass es langsam anfängst zu scrollen und das scrollen auch wieder langsam endet. Das scrollen wirkt damit weicher.
  Wenn ich die Message WM_MouseWheel wie in meinem Code-Ausschnitt einfach durchreiche, kann ich...
• Forum: Win32/Win64 API (native code)

  Wie Fehler suchen: WM_MouseWheel nicht in WindowProc()

   
    by Schwedenbitter, 6. Sep 2010
  Hallo,
  
  ich habe auf meinem Form ein TRichEdit zu liegen und möchte gern, dass dieses mit der Mouse gescrollt wird; und zwar auch dann, wenn es nicht den Focus besitzt. An sich habe ich das mit folgendem Codeausschnitt geschafft:type
  TMsgsTester = class(TForm)
  Log : TRichEdit;
  BtnNewCount : TButton;
  procedure FormCreate(Sender: TObject);
  ...