Рисование на загруженном из файла изображении

[DOLBY]

Здравствуйте. У меня проблема. Пытаюсь "рисовать" что либо на картинке, загруженной из файла:

procedure TForm1.Button1Click(Sender: TObject);
begin
 if(OD.Execute) then
  Image1.Picture.LoadFromFile(OD.FileName);
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
 Image1.Picture.Bitmap.Canvas.LineTo(100,100);
end;

Но при

Image1.Picture.Bitmap.Canvas.LineTo(100,100);

вылетает ошибка Cannot only modify an imageif it containsa bitmap.
Подскажите, как мне рисовать графич примитивы на изображениях, загруженных из файла?

[lexaltd]

Всё работает ты наверно загружаеш .jpg и пытаешся на нём рисовать , по тому и ошибка
Если хочеш рисовать на .jpg - то сделай приблизительно так
uses Jpeg;

procedure TForm1.Button1Click(Sender: TObject);
var
JpegIm: TJpegImage;
bm: TBitMap;
begin
if OD.Execute then
bm := TBitMap.Create;
JpegIm := TJpegImage.Create;
JpegIm.LoadFromFile(OD.FileName);
bm.Assign(JpegIm);
Image1.Canvas.Draw(0, 0, bm);
bm.Destroy;
JpegIm.Destroy;
end;

[DOLBY]

Да, загружаю я jpeg... Спасибо за пример, помогло

[DOLBY]

а как мне потом содержимое Image1.Canvas скопировать в Image2(или Image2.Canvas)?

[mihali4]

А встроенным хэлпом пользоваться не пробовали? Или какую-никакую книжку почитать?
Программирование методом тыка не освоишь...
Image2.Picture.Assign(Image1.Pictur e);