Новые книги
 В современном мире практически все продается через Интернет, особенно информация. Миллионы людей уже сделали на ней состояние. А вы так хотите? Вы многое умеете и многое знаете, так начните продавать свои знания и зарабатывать на них деньги! Авторы этой книги раскрывают простые схемы создания собственного инфобизнеса. На каждую из основных его сфер представлена интеллект-карта, которая позволяет полностью охватить всю тему и разложить ее по полочкам. Эта книга должна стать настольной для любого человека, который хочет запустить свой инфобизнес и успешно его развивать. Вы узнаете, за что люди будут готовы отдать деньги и какие темы наиболее востребованны, как красиво «упаковать» ваши знания, как набрать базу подписчиков, как поддерживать интерес к инфопродукту и увеличивать его стоимость и, наконец, как можно зарабатывать на продаже своих знаний триста тысяч рублей в месяц. Интересно? Тогда читайте дальше и применяйте все инструменты на практике! |
 «Яндекс» — это, конечно, компания мечты. По всем параметрам. В пятерке поисковиков мировой Сети, в тридцатке самых инновационных компаний мира, и одно из самых желанных мест для работы в России. Бизнес, возникший из головы, интеллекта, знаний, упорного труда, способности к риску и удачи — возникший, несмотря на давление со стороны инвесторов, власти и конкурентов.Из увлекательного повествования, максимально приближенного к хронике, понятно, что «Яндекс» — это невероятная по силе и напору машина генерации событий, явлений и открытий. Во главе с Аркадием Воложем компания на протяжении уже более полутора десятков лет находится на гребне успеха. В процессе работы над книгой автор, профессиональный журналист, задействовал сотни источников и десятки личных контактов. Прочтите эту уникальную книгу, и вы наверняка извлечете для себя рецепты построения своей компании и команды мечты. Секретов больше нет. |
INI-файлы (чтение/запись)
function ReadIni(ASection, AString : String) : String;
var
sIniFile: TIniFile;
sPath : String[60];
const
S = 'xyz'; { стандартная строка для выдачи ошибок чтения }
begin
GetDir(0,sPath);
sIniFile := TIniFile.Create(sPath + '\Name.INI');
Result := sIniFile.ReadString(ASection, AString, S); { [Section] String=Value }
sIniFile.Free;
end;
procedure WriteIni(ASection, AString, AValue : String);
var
sIniFile: TIniFile;
sPath : String[60];
begin
GetDir(0,sPath);
sIniFile := TIniFile.Create(sPath + '\Name.INI');
sIniFile.WriteString(ASection, AString, AValue);; { [Section] String=Value }
sIniFile.Free;
end;
{ReadSection считывает все пункты указанной секции - т.е. ключи перед знаком "="
ReadSectionValues полностью считывает все строки указанной секции, т.е. Punkt=xyz }