October 11, 2008 09:53pm pdt

My Account

Top 15 Experts

Overall Top Experts

1kretzsch... 1,400,934
2rllibby 1,306,730
3ciuly 1,145,613
4ziolko 740,917
5Madshi 662,000
6Slick812 645,363
7geobul 628,081
8EddieShip... 626,962
9mnasman 600,905
10Workshop... 558,365
11inthe 514,714
12TheRealL... 507,485
13Ferruccio68 442,154
14mokule 424,345
15MerijnB 395,880

	[x] Attachment Details

image in scrollbox

[x]

The Solution Rating System

With so many solutions, how can you tell which solutions are most likely to help you and which ones are not? To provide you with a tool to use, we rate our solutions based on various elements that most accurately determine if a solution is a quality solution. To explain what factors affect the solution rating, here are the elements we take into consideration when formulating our solution rating.

The Grade of the Solution
The Zone Rank of the Expert Providing the Solution
The Number of Author and Expert Comments
The Number of Experts Contributing
The Feedback of the Community

Your Input Matters
Because of the way the system is set up, the most important variable in this equation is you. As a member of Experts Exchange, you are able to cast your vote on the quality of the solutions in regard to how complete, accurate, helpful and easy to understand each solution is. When you provide your feedback, each rating is adjusted accordingly. So, if you see a solution that has a poor rating that you think is a good solution, let us know by rating it. As you do, the rating will be adjusted and will become more accurate for other members of our site.

If you have any suggestions that you would like to make for our rating system, please ask a question in the Suggestions Zone of Community Support.

Thank you!

8.6

Zone: Delphi Programming

Tags: image, scrollbox

I wrote a program to display a picture using Delphi 5.

>Target:
Put a image in a scrollbox. Hope the image locates at the center of the scrollbox, when the size of image is larger than the size of scrollbox, the scrollbox will display scroll bar.

>I did as below:
///----------
//set

image1.align:=alnone;
image1.scretch:=true;
image1.autosize:=true;

// add coeds in FORMCREATE and SCROLLBOX ONRESIZE:

var
imagetop,imageleft:integer;
begin

imagetleft:=trunc(scrollbox1.width/2)-trunc (image1.width/2);
if imageleft>0 then image1.left :=imageleft
else image1.left:=0;

imagetop:=trunc(scrollbox1.height/2)-trunc(image1.height/2);
if h>0 then image1.top :=imagetop

else image1.top:=0;

Image1.width:=Image1.picture.width ;
Image1.height:=Image1.picture.height ;

//...

end;
>Problem:
It is true that the image displays at the center of scrollbox, and when the size of image is larger than the size of scrollbox, the scrollbox also displays the scroll bar, but the image can not move!

Can anyone help me?

Thanks

	#	Title
	1	Scrollbox
	2	Center Image in Scrollbox
	3	memo in scrollbox
	4	Printing contents of scrollbox?
	5	Larger components than 32768 in …
	6	Dragging a Timage in scrollBox