Почитайте!

Нас читают

Статьи о программировании и не только

Mail.Ru

Rambler's Top100

Programming Blogs - BlogCatalog Blog Directory


Как инвертировать изображение? (способ 1)

Delphi FAQ >> Графика

При помощи данной процедуры на Delphi можно инвертировать изображение, хранящееся в Bitmap:

procedure InvertBitmap(Bitmap:TBitmap);
begin
  Bitmap.Canvas.CopyMode := cmDstInvert;
  Bitmap.Canvas.CopyRect(Bitmap.Canvas.ClipRect, Bitmap.Canvas, Bitmap.Canvas.ClipRect);
  Bitmap.Canvas.CopyMode := cmSrcCopy;
end;

Ссылки в тему:
  Как инвертировать изображение? (способ 2)


Сейчас свой сайт - это уже не роскошь, а зачастую источник заказов. Но чтобы клиенты заходили на сайт, он должен быть на высоких позициях в поисковых системах. Вот тут уже нужно обращаться к профессионалам, например - раскрутка сайта в Харькове - продвиньте свой сайт в топ.