I have asked a similar question, where in my app I use TImageList and
TtreeView, the problem was the treeview failed to show images. Alistair
told me that it was ComCtl32.dll version problem.

This time I was reported that,  in a customer's machine, when viewing
the icon files *.ico in Explorer, the icon files do not appear as
pictures - they all show the standard icon.

Sorry to as silly question, as I can't reproduce the problem in my
office, nor can I contact the customer who has 8 hours time difference
from us.

Cheers 
Yanbo






                -----Original Message-----
                From:   [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED]] On Behalf Of Alistair George
                Sent:   Thursday, 10 June 1999 12:36 PM
                To:     Multiple recipients of list delphi
                Subject:        RE: [DUG]:  Welcome image

                Good question - case of me learning more every day.
Thanks for bring that to
                my attention.
                Al+
                > Why do you draw to a Bitmap and then draw the bitmap
to the form.
                > Can't you just draw the JPEG direct to the form since
in both cases
                > you're drawing to a TCanvas. Hide the form borders
(Should the form
                > Clientwidth or Width be set to match the JPEG).
                >
                > Something like {Untested code}
                >
                > var
                >   JPG :TJPEGImage;
                >   Frm :TForm;
                > begin
                >   JPG := TJPEGImage.Create;
                >   Frm := TForm.Create(nil);
                >   with Frm do try
                >     BorderStyle := boNone;
                >     Position := poScreenCenter;
                >     JPG.LoadFromFile('TheImage.Jpg');
                >     ClientWidth := JPG.Width;
                >     ClientHeight := JPG.Height;
                >     Show;
                >     Canvas.Draw(0,0,JPG);
                >     {Do stuff here}
                >   finally
                >     if JPG<>nil then JPG.Free;
                >     if FRM<>nil then FRM.Release;
                >   end;
                > end;
                >
                > >         try form.Free; except ; end;
                >
                > I always thought you were supposed to use Form.Release
not
                > Form.Free to handle any pending messages before
closing (EG
                > user clicked on the form during heavy processing
leaving these
                > click messages unprocessed whent he form is destroyed
- which
                > I think might raise an exception).


------------------------------------------------------------------------
---
                    New Zealand Delphi Users group - Delphi List -
[EMAIL PROTECTED]
                                  Website: http://www.delphi.org.nz



---------------------------------------------------------------------------
    New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
                  Website: http://www.delphi.org.nz

Reply via email to