Новые книги

With important new revelations into the Russian hacking of the 2016 Presidential campaigns

cite

“[Andrei Soldatov is] the single most prominent critic of Russia’s surveillance apparatus.”

text-author

—Edward Snowden

After the Moscow protests in 2011–2012, Vladimir Putin became terrified of the internet as a dangerous means for political mobilization and uncensored public debate. Only four years later, the Kremlin used that same platform to disrupt the 2016 presidential election in the United States. How did this transformation happen?

The Red Web is a groundbreaking history of the Kremlin’s massive online-surveillance state that exposes just how easily the internet can become the means for repression, control, and geopolitical warfare. In this bold, updated edition, Andrei Soldatov and Irina Borogan offer a perspective from Moscow with new and previously unreported details of the 2016 hacking operation, telling the story of how Russia came to embrace the disruptive potential of the web and interfere with democracy around the world.

A Library Journal Best Book of 2015

A NPR Great Read of 2015
В мире проводится огромное количество исследований предпочтений потребителей, но далеко не все они приводят к желаемым результатам: провалы случаются на каждом шагу. Похоже, что компании неверно интерпретируют ситуацию. Как же заглянуть в будущее? Автор этой книги, Мартин Реймонд, генеральный директор агентства The Future Laboratory («Лаборатория будущего»), говорит, что о грядущем много могут рассказать потребительские тренды, зарождающиеся сегодня. Он рассказывает, где найти потенциал прибыльности, как использовать социальные сети и на чем основывать свой маркетинг. Рекомендуется к прочтению руководителям компаний, специалистам по маркетингу и брендингу, слушателям программ MBA и магистратуры.

Вопрос и Ответ 24

Вопросы и Ответы


      24. Можно ли получить позицию курсора в компоненте TMemo?

      В компоненте TMemo предусмотрено получение позиции курсора через механизм сообщений. Для получения позиции необходимо послать два сообщения. Первое -

      LineNum := Memo1.Perform(EM_LINEFROMCHAR, Memo1.SelStart, 0);

      для получения номера строки в которой находится курсор. И второе -

      CharNum := Memo1.Perform(EM_LINEINDEX, LineNum, 0);

      для получения позиции курсора в заданной строке. Будте внимательны, так как номер строки и позиция в строке отсчитываются от нуля.

      Пример:

      ............

      {Получаем позицию курсора при щелчке мыши на компоненте}
      procedure TForm1.Memo1Click(Sender: TObject);
      VAR

        LineNum : LongInt;
        CharNum : LongInt;

      begin

        {Получаем номер строки}
        LineNum := Memo1.Perform(EM_LINEFROMCHAR, Memo1.SelStart, 0);
        {Получаем позицию в строке}
        CharNum := Memo1.Perform(EM_LINEINDEX, LineNum, 0);
        {Выводим позицию на экран}
        Label1.Caption := IntToStr(LineNum+1)+' : '+

          IntToStr((Memo1.SelStart-CharNum)+1);

      end;

      ............

      {Получаем позицию курсора при отпускании клавиши на клавиатуре}
      procedure TForm1.Memo1KeyUp(Sender: TObject; var Key: Word; Shift: TShiftState);
      begin

        Memo1Click(Self);

      end;

      ............


...предыдущая страница следующая...
оглавление



"Вопрос и Ответ 24"
Copyright © "В помощь Веб-Мастеру" (Alexander D. Belyaev) 2005-2024 .
При перепечатке любого материала видимая ссылка на источник "В помощь Веб-Мастеру" и все имена, ссылки авторов обязательны!
Время генерации страницы: 0.008