?
Solved

JPEG in Delphi

Posted on 1997-03-18
5
Medium Priority
?
1,014 Views
Last Modified: 2013-11-19
I'm trying to make a program, which browses through
my collection of holidayphoto's, which I scanned myself.

I saved these pictures in JPG format to save disk space.

Could somebody help me, how to view them.
Is there a freeware sourcecode for it, because
ImageLib is just not it for me, because
I don't want to spent money on it, and I
don't like the screens that it gives.
0
Comment
Question by:orionltd
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
5 Comments
 

Expert Comment

by:fonta
ID: 1334906
It's possible, if you only want to view those pictures in the screen, to put an Ole Container control (you can find it in the System tab of the component palette) and then you can make a table with only the filename (string field) and some other fields containing other information about your images (what you want). In response on an event you can use the method LoadFromFile of the Olecontainer control and the name of the file could be given by the appropriate field on your table ... if you are really interested I can send you a piece of code as an answer ok ?

my e-mail is
fonta@telnetwork.it
0
 
LVL 3

Expert Comment

by:mheacock
ID: 1334907
There are some FREEWARE jpeg components available at the
Delphi Super Page...if all you want to make is a kind of
slide show, then these would be perfect for you...the URL is:

   http://www.cdrom.com/pub/delphi_www/

0
 
LVL 3

Expert Comment

by:mheacock
ID: 1334908
Were you able to download a few JPG components?  Did they do
what you were looking for?
0
 

Author Comment

by:orionltd
ID: 1334909
Sorry Fonta had a better answer
0
 

Accepted Solution

by:
jaimi earned 200 total points
ID: 1334910
To view a Jpeg from within your delphi program, you can
download the following file:

http://carbohyd.siobc.ras.ru/torry/VCL/GRAPHICS/NVIEWLIB.ZIP

You would then call this function:
function NViewLibLoad(FileName : PChar; ShowProgress: BooLean):hbitmap; Stdcall;

Assuming you had an openfile dialog named opendialog1, a
button named openbutton, and a timage named image1 then
you could view it like this:

procedure tform1.openbuttonclick(sender : tcomponent);
var hbm : hbitmap;
begin
    if opendialog1.execute then begin
        Image1.Picture.Bitmap.Handle:= NViewLibLoad('fig.jpg',         FALSE);
    end;
end;
0

Featured Post

New benefit for Premium Members - Upgrade now!

Ready to get started with anonymous questions today? It's easy! Learn more.

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…
Have you ever had your Delphi form/application just hanging while waiting for data to load? This is the article to read if you want to learn some things about adding threads for data loading in the background. First, I'll setup a general applica…
In this tutorial viewers will learn how to create blended and gradiated shapes in Illustrator using the blend tool Draw two shapes, one of them in a different color: Select both and create a blend by going to Object > Blend > Make: Blends can also b…
HTML5 has deprecated a few of the older ways of showing media as well as offering up a new way to create games and animations. Audio, video, and canvas are just a few of the adjustments made between XHTML and HTML5. As we learned in our last micr…
Suggested Courses
Course of the Month13 days, 6 hours left to enroll

801 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