Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.11.12;
Скачать: CL | DM;

Вниз

Подскажите, как скопировать с Form1 изображение, нарисованное   Найти похожие ветки 

 
Aleks ©   (2006-10-25 13:38) [0]

Доброго времени суток.
Подскажите, как скопировать с Form1 изображение, нарисованное с помощью Canvas и сохранить его в файл JPG или BMP


 
Джо ©   (2006-10-25 13:45) [1]

Не совсем понятно, что такое "изображение, нарисованное с помощью Canvas", но взгляни на это:
var
 Bmp: TBitmap;
begin
 Bmp := TBitmap.Create;
 try
   Bmp.Width := ClientWidth;
   Bmp.Height := ClientHeight;
   PaintTo(Bmp.Canvas,0,0);
   Bmp.SaveToFile("d:\123.bmp");
 finally
   Bmp.Free
 end
end;


 
Aleks ©   (2006-10-25 14:02) [2]

(Не совсем понятно, что такое "изображение, нарисованное с помощью Canvas",)

Всё что находится на форме (компоненты), сохраняются в файл,
Но то что нарисованно (Извиняюсь если не точно выражаюсь) на ней, нету.
Например вот это

var
Bmp: TBitmap;
i:integer;
begin
Bmp := TBitmap.Create;
For i:=0 to 100 do
Form1.Canvas.Rectangle(12+i,12,57+i,58); // Для примера рисуем квадратики
Bmp := TBitmap.Create;
try
  Bmp.Width := ClientWidth;
  Bmp.Height := ClientHeight;
  PaintTo(Bmp.Canvas,0,0);
  Bmp.SaveToFile("d:\123.bmp");
finally
  Bmp.Free
end
end;


 
Джо ©   (2006-10-25 14:05) [3]

> [2] Aleks ©   (25.10.06 14:02)
> Form1.Canvas.Rectangle(12+i,12,57+i,58); // Для примера
> рисуем квадратики

Ты эти квадратики должен рисовать на канве формы в обработчике OnPaint.


 
Aleks ©   (2006-10-25 14:21) [4]

Если рисовать на канве формы в обработчике OnPaint, то всё отлично получается.



Страницы: 1 вся ветка

Текущий архив: 2006.11.12;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.058 c
15-1161338522
зритель
2006-10-20 14:02
2006.11.12
умер Эммануил Виторган


1-1159609615
AFFONYA
2006-09-30 13:46
2006.11.12
Поиск по тексту.


1-1159617913
Diss
2006-09-30 16:05
2006.11.12
Отправка Смс-сообщений через телефон, подключенный к ком-порт


4-1151488495
Sergey__
2006-06-28 13:54
2006.11.12
Проблема при работе с СОМ-портом


2-1161885095
Alral
2006-10-26 21:51
2006.11.12
Array [ 0..225] of Char, String