![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
DXDraw [D5, Win95/98]
Шишков Илья © (2002-06-15 20:48:00)Скажите пожалуйста, как то, что нарисовано на DXDraw, сохранить .bmp-файл
Spose (2002-06-17 10:47:00) [1]procedure TMainForm.PrintScreen;
Const
N : integer=1;
Var
NewGraphic : TDIB;
FileName : String;
begin
NewGraphic := TDIB.Create;
try
DXDraw.Primary.AssignTo(NewGraphic);
FileName:=GetName("Screen"+IntToStr(N)+".bmp");
Inc(N);
NewGraphic.SaveToFile(FileName);
finally
NewGraphic.free;
end;
end;
В юзес токо допиши DIB