повернуть экран на 180 градусов

[jihot]

Скажите, можно как-нибудь повернуть экран на 180* ?

P.S. sorry если подобные темы были.

[RUSt88]

можно тупо копирнуть экран в битмап и вывести его перевернутым
или нужно так, как драйвер видеокарты делает?

[DeKot]

копирнуть экран в битмап и вывести его перевернутым

А вот с этого места можно поподробнее?

[MaxNik2009]

Я вот так переворачивал снимок окна

// функция переворота изображения
function ReversImage(Rect: TRect):TRect;
var
  tmpRect:TRect;
begin
  tmpRect.Left:=Rect.Right;
  tmpRect.Top:=Rect.Bottom;
  tmpRect.Right:=Rect.Left;
  tmpRect.Bottom:=Rect.Top;

  Result:=tmpRect;
end;


procedure TForm3.FormCreate(Sender: TObject); 
var
  c: TCanvas;
  r: TRect;
begin
  // размер формы
  Left:=0;
  Top:=0;
  Width:=screen.DesktopWidth;
  Height:=screen.Height;

  c:= TCanvas.Create;
  c.Handle:= GetDC(0);     // получаем доступ к канве рабочего стола

  // размер копируемой области
  R:= Bounds(screen.DesktopLeft, screen.DesktopTop,
             screen.DesktopWidth,screen.DesktopHeight);

  Image1.Canvas.CopyRect(ReversImage(r),c,r);

end;

[jihot]

Сообщение от RUSt88

можно тупо копирнуть экран в битмап и вывести его перевернутым
или нужно так, как драйвер видеокарты делает?

желательно бы как драйвер видеокарты делает...