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

Вниз

Image+Label = сохранение картинки   Найти похожие ветки 

 
Литвиненко Вадим   (2003-04-28 15:28) [0]

На форме лежит Image и на ней прозрачный Label. Загружаю в Image картинку, печатаю текст в Label. Как теперь сохранить в файл получившуюся картинку?
Заранее спасибо за ответы.


 
ProgMan ©   (2003-04-28 18:47) [1]

Сляпал на скорую руку (может пригодится):

procedure TForm1.Button1Click(Sender: TObject);
Var
TB:TBitMap;
begin
TB:=TBitmap.Create;
TB.Width:=100;
TB.Height:=100;
TB.Canvas.CopyRect(Rect(0,0,99,99),Form1.Canvas,Rect(0,0,99,99));
TB.SaveToFile("1.bmp");
TB.Free;
end;

При условии, что Image лежит в левом верхнем углу формы


Координаты и размеры задавай для себя сам.


 
DimaK ©   (2003-05-04 23:20) [2]

Обсолютно верно, как-то необходимо было мне написать форму отчета, да так, что-бы ее надо было заполнять, вот и придумал создавать в run time компонент метки, перемещать его куда надо и при нажатии на кнопку сохранить, примерно тем же путем копировал координать экрана и создавал обычную bmp.



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

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

Наверх




Память: 0.47 MB
Время: 0.018 c
1-1493
n-m-a
2003-08-18 09:37
2003.09.01
Я извеняюсь за свой может глупый вопрос, но можно ли узнать


3-1280
Fantasy
2003-08-09 05:34
2003.09.01
Есть ли в SQL втроеная переменная реального даты и времени


3-1340
Tahion2
2003-08-11 13:01
2003.09.01
Как в ClientDataSet сохранить начальный порядок следования записе


14-1564
McSimm
2003-08-10 16:03
2003.09.01
Об изменениях в форумах


1-1497
ossa
2003-08-18 08:41
2003.09.01
Подскажите как из 2-го модуля вывести в 1-м в Label текст.