I.T. Discussion Community!
-Collapse +Expand
Delphi
Search Delphi Group:

Advanced
-Collapse +Expand Delphi To/From
To/FromCODEGuides
-Collapse +Expand Delphi Store
PRESTWOODSTORE

Prestwood eMagazine

November Edition
Subscribe now! It's Free!
Enter your email:

   ► MB LobbyPascal and Delphi Coding BoardDelphi Object PASCAL Topic   Print This     

Tips

Angel
 (Inactive)
England
In the hope of livening up the Delphi boards a little bit (the paradox users are laughing at us) I have started this Tips thread. The idea being that we can share the little tips we have to make each others lives a little easier. Who knows, if the idea takes off, maybe I can convince Mike to add a dedicated Tips section.

I'll even start the ball rolling! Ever notice how the Mouse wheel only scrolls through the visible records of a DBGrid and then stops? You can rectify this by declaring a public procedure.
public
{ Public declarations }
procedure AppMessage(var Msg: TMsg; var Handled: Boolean);
Then just add the following code as the procedure somewhere on your applications main form.
procedure TForm1.AppMessage(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;
 Posted 17 years ago (Thread Starter)
Comment Quote
About Angel -Collapse +Expand
Visit Profile
Inactive member.
Member does not subscribe to this thread.
Email Not Verified!
Once email is verified, we will review and approve the account.
Web Presence Hidden.
Once above is taken care of, full Profile content will display including back links, about me, my message, custom Profile html, social networking links, message board signature, company profile, etc.

Post ID #9814, 1 replies
Thread Started 7/22/2003 8:20:00 AM
View Counter=3725
Location=England  
Joined=19 years ago   MB Posts=199  
Most Recent Post
Scott Wehrly
Prestwood IT
 (Inactive)
Las Vegas, NV USA
Zzzzzz.... Zzzzzz.... Zzzzzz....



Whu? Someone on the Delphi forums??? I better wake up! Big Grin!



Good, tip, Angel. Of course, Mike will tell you that the place for programming tips is in our Knowledge Base.



But then, if we start moving topics around, it could make the board members go away again.



Then I could go back to my Rip Van Winkle impersonation.



Zzzzzz.... Zzzzzz.... Zzzzzz....
 Posted 17 years ago
Comment Quote
About Scott Wehrly -Collapse +Expand
Visit Profile
Inactive member.
Member does not subscribe to this thread.
Old Account!
If this is your account, sign in to activate web presence data (sign in quarterly to keep active). Alternatively, you can subscribe to our monthly eMag with a valid email address.
Web Presence Hidden.
Once above is taken care of, full Profile content will display including back links, about me, my message, custom Profile html, social networking links, message board signature, company profile, etc.

Post ID #9815 (Level 1.1)  Reply to 9814
Thread Started 7/22/2003 1:00:00 PM
View Counter=2
Location=Las Vegas, NV USA 
Joined=18 years ago   MB Posts=442   KB Posts=19  

Revive Thread!

Add a comment to revive this old thread and make this archived thread more useful.

Write a Comment...
Full Editor
...
Sign in...

If you are a member, Sign In. Or, you can Create a Free account now.


Anonymous Post (text-only, no HTML):

Enter your name and security key.

Your Name:
Security key = P1287A1
Enter key:
Icon: A Post    Thread    Idea    Important!    Cool    Sad    No    Yes    Includes a Link...   
Thread #9814 Counter
3725
Since 4/2/2008

Follow PrestwoodBoards on: 


©1995-2020 PrestwoodBoards  [Security & Privacy]
Professional IT Services: Coding | Websites | Computer Tech