Новые книги

Переговорные техники, описанные Крисом Воссом, родились из сокрушительных поражений ФБР. После трагических событий на ферме Рэнди Уивера в штате Айдахо в 1992 году и в секте «Ветвь Давида» в 1993 году, где в общей сложности погибло почти 100 человек, стало понятно: традиционные методики не работают в экстремальных ситуациях. Поэтому ФБР начало усиленно искать принципиально новые подходы. В результате появились 9 принципов, изложенные автором этой книги, – топ-переговорщиком ФБР с двадцатилетним стажем.

Эта книга – потрясающе увлекательное и одновременно простое руководство по любым переговорам. Не важно, идет ли речь о покупке международной корпорации или ремонте стиральной машинки, методика Криса Восса научит вас добиваться своего. При любых условиях. При любых раскладах. Без необходимости идти на компромисс.

Книга также выходит под названием «Переговоры без компромиссов. Веди переговоры так, словно от них зависит твоя жизнь».
Сегодня контекстная реклама – это спасательный круг для малого и среднего бизнеса. Многие рекламодатели, у которых нет бюджетов на ТВ– и радиорекламу, без контекстной рекламы уже разорились бы. Множество стартапов выжило исключительно благодаря ей. Главное – подойти к созданию рекламной кампании с умом, иначе из спасательного круга она превратится в камень на шее вашего бизнеса. Эта книга не просто пошаговое руководство по созданию и ведению рекламной кампании в Яндекс. Директ, но и возможность заглянуть за кулисы Яндекс. Директ и разобраться в кухне работы директологов.

Все права защищены. Никакая часть данной книги не может быть воспроизведена в какой бы то ни было форме без письменного разрешения владельцев авторских прав.

Как установить количество цветов в системной палитре?




Как установить количество цветов в системной палитре?

Функция GetNumColors возвращает количество цветов для актуально выбранного разрешения экрана.
function GetNumColors: LongInt;
var
   BPP: Integer;
   DC: HDC;
begin
   DC := CreateDC('DISPLAY', nil, nil, nil);
   if DC <> 0 then begin
      try
	 BPP := GetDeviceCaps(DC, BITPIXEL) * GetDeviceCaps(DC, PLANES);
      finally
         DeleteDC(DC);
      end;
      case BPP of
         1: Result := 2;
         4: Result := 16;
         8: Result := 256;
         15: Result := 32768;
         16: Result := 65536;
         24: Result := 16777216;
      end;
   end else
      Result := 0;
end;


Оглавление