Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 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.09 c
15-1336860390
Глеб
2012-05-13 02:06
2013.03.22
Поиск нужного компонента


3-1286948670
Ciberrus
2010-10-13 09:44
2013.03.22
ошибка property already defined by lookup field


15-1332489521
ProgRAMmer Dimonych
2012-03-23 11:58
2013.03.22
Уникальность ключа


2-1335041434
SiDimka
2012-04-22 00:50
2013.03.22
Как передать фокус окну


15-1340312237
Германн
2012-06-22 00:57
2013.03.22
Подскажите есть ли в каком-нибудь стандартном шрифте в WinXP





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский