?
Solved

add the arrows as a scroll

Posted on 2004-04-05
1
Medium Priority
?
329 Views
Last Modified: 2010-04-05
how to add 2 arrows to scroll the content of the panel

0
Comment
Question by:zgeorge_2
1 Comment
 
LVL 11

Accepted Solution

by:
shaneholmes earned 440 total points
ID: 10762432
Hi george, I added these for you.

I created two new buttons (+ two new actions) and added the following functionality:

procedure TfrmMain.actUpExecute(Sender: TObject);
begin
 lvwReceipt.ItemIndex:= lvwReceipt.ItemIndex - 1;
 lvwReceipt.Items[lvwReceipt.ItemIndex].Selected:= True;
 lvwReceipt.Items[lvwReceipt.ItemIndex].Focused:= True;
end;

procedure TfrmMain.actDownExecute(Sender: TObject);
begin
 lvwReceipt.ItemIndex:= lvwReceipt.ItemIndex + 1;
 lvwReceipt.Items[lvwReceipt.ItemIndex].Selected:= True;
 lvwReceipt.Items[lvwReceipt.ItemIndex].Focused:= True;
end;

Shane
0

Featured Post

Vote for the Most Valuable Expert

It’s time to recognize experts that go above and beyond with helpful solutions and engagement on site. Choose from the top experts in the Hall of Fame or on the right rail of your favorite topic page. Look for the blue “Nominate” button on their profile to vote.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

A lot of questions regard threads in Delphi.   One of the more specific questions is how to show progress of the thread.   Updating a progressbar from inside a thread is a mistake. A solution to this would be to send a synchronized message to the…
Introduction I have seen many questions in this Delphi topic area where queries in threads are needed or suggested. I know bumped into a similar need. This article will address some of the concepts when dealing with a multithreaded delphi database…
This lesson discusses how to use a Mainform + Subforms in Microsoft Access to find and enter data for payments on orders. The sample data comes from a custom shop that builds and sells movable storage structures that are delivered to your property. …
When cloud platforms entered the scene, users and companies jumped on board to take advantage of the many benefits, like the ability to work and connect with company information from various locations. What many didn't foresee was the increased risk…
Suggested Courses
Course of the Month15 days, 6 hours left to enroll

840 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question