работа с Canvas

[BloodMaX]

как загрузить изображение в canvas анпример из jpg файла и допусттим отрисовать на нем шар, просто когда в Bitmap загружаю программа ругается якобы не моджет отрисовывать на загруженном битмапе, т.е. в канвасе должно быть изображение

[mihali4]

Не нужно стесняться - показывайте, как вы делаете.
Так будет проще отвечать...

[BloodMaX]

да вы мне лучше объясните как в канвас загрузить изобрежнние из файла?

[mihali4]

Сообщение от BloodMaX

да вы мне лучше объясните как в канвас загрузить изобрежнние из файла?

А вы поучитесь формулировать вопросы.
В канву чего?

[BOBAH13]

Сообщение от BloodMaX

да вы мне лучше объясните как в канвас загрузить изобрежнние из файла?

К вашему огромнейшему разочарованию - это не возможно Приношу свои соболезнования

p.s. если имелось ввиду вывести на Canvas (он же HDC) какое то изображение то возможно TBitmap, TJPEGImage или подобные классы для вашего формата изображения помогут + раз используется TCanvas, то и метод TCanvas.Draw() так же поможет в такой столь сложной ситуации. Где искать ? Эм... ну интернет или сразу F1 в IDE. А еще есть книжные магазины, да именно книжные, там книги продаются, как вариант сходить "туда" и купить книжечку для изучения, чтобы основные момент прояснились.

Edit:

Уважаемый Вован, вы сами себе противоречите, ибо подсказали обходной путь - через Draw...

было сказано

как загрузить изображение в canvas

так что все связи учтены

[mihali4]

Сообщение от BOBAH13

К вашему огромнейшему разочарованию - это не возможно Приношу свои соболезнования

Уважаемый Вован, вы сами себе противоречите, ибо подсказали обходной путь - через Draw...
Прямого метода нет, но разве это когда-нибудь смущало программера?

[Лубышев]

Ребят, ну ладно то вам парня мучать:

для того чтобы загнать в canvas jpg его надо преобразовать в bmp:

uses 
  JPEG; //добавляем модуль для работы с jpg

............
var 
  jpeg: TJPEGImage; 
  bmp:  TBitmap; 
begin 
    jpeg := TJPEGImage.Create; //создаем
    jpeg.CompressionQuality := 100; {Default Value} 
    jpeg.LoadFromFile('файл_формата_JPG.jpg'); //грузим
    bmp := TBitmap.Create; //создаем
    bmp.Assign(jpeg); //ассоциируем
    jpeg.Free; //уничтожаем так как больше не нужен
   //все теперь рисуем че хотим
    bmp.Canvas.Rectangle(0,0,100,100);//например

   bmp.Free;//и после манипуляций удаляем 
end;

[DeKot]

Еще один код:

uses
 ...,JPEG;

...
var
  Form1: TForm1;
  BufJPG: TJPEGImage;

implementation

{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
begin
  BufJPG:= TJPEGImage.Create; // создали объект TJPEGImage
  BufJPG.LoadFromFile('Screen.jpg'); // загрузили в него рис. из файла
end;

procedure TForm1.FormPaint(Sender: TObject);
begin
  With Form1.Canvas do
  begin
    Draw(0,0,BufJPG); // выводим Jpeg рисунок на канву формы
    Pen.Color:= clWhite; // цвет пера - белый
    Ellipse(50,50, 200,200); // рисуем круг на канве формы
  end;
end;