Форум: "Начинающим";
Текущий архив: 2013.03.22;
Скачать: [xml.tar.bz2];
ВнизСохранить картинку Найти похожие ветки
← →
alexdn © (2012-09-09 06:24) [0]На форме - image1 хочу сделать "сохранить как.." по клику, правому, мышкой.. какие стандартные компоненты использовать для меню и сохранения?
← →
Anatoly Podgoretsky © (2012-09-09 08:06) [1]Раз хочещь всплывающее меню, то и используй его
← →
alexdn © (2012-09-09 11:15) [2]Нужно сохранить канву в файл, создаю Bitmap
Bitmap := TBitmap.Create;
Bitmap.SaveToFile("bm.bmp");
а как связать bitmap и Image1.Canvas?..
← →
alexdn © (2012-09-09 11:18) [3]т.е. делаю так, но это совсем неправильно -
Bitmap := TBitmap.Create;
Image1.Canvas.CopyRect(Bitmap);
Bitmap.SaveToFile("bm.bmp");
← →
bems © (2012-09-09 11:26) [4]Image1.Picture.Bitmap.SaveToFile
← →
alexdn © (2012-09-09 11:33) [5]> bems © (09.09.12 11:26) [4]
спасибо
← →
alexdn © (2012-09-09 12:10) [6]почему нельзя написать сразу, что ещё надо? -
procedure TForm4.N1Click(Sender: TObject);
begin
SavePictureDialog1.Execute;
Image1.Picture.Bitmap.SaveToFile("SavePictureDialog1.FileName");
end;
← →
QAZ (2012-09-09 12:56) [7]
> что ещё надо?
всетаки прочитать книжку из разряда "Делфи для чайников"
← →
Юрий Зотов © (2012-09-09 13:05) [8]
> alexdn © (09.09.12 12:10) [6]procedure TForm4.N1Click(Sender: TObject);
begin
if SavePictureDialog1.Execute then
Image1.Picture.Bitmap.SaveToFile(SavePictureDialog1.FileName); // Убрать апострофы
end;
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2013.03.22;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.076 c