Решил написать статью о том, как можно заработать на ламерах
****************************************************
Что нам для этого понадобиться?
1. Borland Delphi (я пользуюсь 7 версией)
2. Способность к рекламе
3. Фантазия
4. Свободное время
5. Немного иконок
Ну и конечно же интернет:)
****************************************************
И так, преступим:
1. Создаем форму ( File ==>> New ==>> Applicatoin ) (если она уже не создана)
2. В палитре компонентов найдите компоненты Button (кнопка), RadioButton (3 штуки), ChekBox, Label (3 штуки), Edit (2 штуки), закинте их на форму (нажмите 1 раз на компонент и 1 раз на форму)
Цвет и заголовок формы можно менять в Object Inspector
Скрин:http://s004.radikal.ru/i205/1002/cd/9b96c0aaa03b.jpg
3. Расставляем все компоненты так, как вы сами хотите:)
Теперь будем работать с визуальным видом нашей программы:
Названия компонентов меняется в Object Inspectjh в поле Caption (CheckBox1 и т.д.) или Text (Edit и т.д.)
Поменяли названия ? Молодцы. У меня получилось вот такое:
Скрин:http://s55.radikal.ru/i148/1002/92/2be21babcfd8.jpg
Теперь создаем еще 1 форму ( File ==>> New ==>> Form )
Задаем ей название "Активация продукта" (в поле Caption, которое находится в Object Inspector)
Задаем ей цвет ( я предпочту черный)
Закидываем на нее компоненты Button, Edit, Label ( они находятся в палитре компонентов )
Вот у меня что получилось
Скрин:http://i063.radikal.ru/1002/5a/212a1a4b88ec.jpg
Вместо звездочек укажите свои данные
4. Теперь приступим к написанию кода:
Заходим на первую форму и нажимаем на кнопку "Собрать!" (у меня она так называется) 2 раза и пмшем:
procedure TForm1.Button1Click(Sender: TObject);
begin
form2.show; // показываем форму 2 по нажатию
end;
end.
**********************************************************************************
С формой 1 закончили, теперь заходим на форму 2 и нажимаем на кнопку "Активировать приложение" (у меня она так называется) и пишем код:
procedure TForm2.Button1Click(Sender: TObject);
begin
Messagedlg ('Неверный ключ продукта',mtError,[mbOK],0);
end;
end.
************************************************************************************
Теперь по нажатию кнопки "Активировать приложение" будет выводиться ошибка с сообщением "Неверный ключ продукта"
************************************************************************************
Теперь нажимаем F9 (может вылезти сообщение, нажимайте Yes и после чего еще раз нажимайте на F9)
Вот и все, ваша программа почти готова, да, именно почти, теперь закончим ее до конца:
Нажимаем Shift + Ctrl + F11
Заходим во вкладку Application
В Title пишем "Деньги на халяву", после чего нажимаем "Load Icon..." и ищем иконку (значок) для вашей программы.
Нашли, выбрали, нажимаем ОК
Теперь снова нажимаем F9
Все.. программа готова
Теперь заходим в папку с программой, заходим в папку Projects и находим файл Project1.exe
*****************************************************************************************
Теперь надо разрекламировать эту программу:)
*****************************************************************************************
Спасибо за внимание:)