My Delphi Program wont show JPegs!

[PaidtheUmpire]

I need help

I want to display the file Titleimage.jpeg in the Image location, but it says Delphi doesn't recognise it!

Any ideas?


PROGRAMS USES
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, XPMan, StdCtrls, ExtCtrls, Buttons, ComCtrls, Grids, DBGrids;


CODE INVOLVING THE IMAGE
Image.Picture.LoadFromFile('Images/titleimage.jpg');

 

[whosrdaddy]

uses Jpeg,...


procedure LoadJpeg(filename: string);
var jpeg : TJepImage;
begin
 jpeg:=TJepImage.Create;
 try
  Jpeg.loadFromFile(filename);
  Image.Picture.Assign(Jpeg);
 finally
  FreeAndNil(Jpeg);
 end;
end;

--------------------------------------
What You See Is What You Get

 

[sggaunt]

But you might have a problem with 'TJepImage' (typo whosrdaddy?)

jpeg:=TJpegImage.Create;
Works for me
but D3 dosnt want anything to do with 'FreeandNil'.
You can do Jpeg.free but jpeg.assign(nil) dosent work, there may be some other way to clear the momory before freeing it?



Steve
Two things are infinite
The Universe and Human stupidity: Einstein.
(He wasn't too sure about the Universe)

 

[whosrdaddy]

procedure FreeAndNil(var Obj);
var
Temp: TObject;
begin
Temp := TObject(Obj);
Pointer(Obj) := nil;
Temp.Free;
end;

copy/paste from D7

--------------------------------------
What You See Is What You Get

 

[Punchinello]

I don't know if you've gathered it from these responses, but all you really have to do is add JPEG to the uses clause of the form or forms that use them. Just that will allow your existing code to work just fine.