Delphi - Делаем заставку для приложения - Программирование - Каталог статей - Хакерская лаборатория HACK-LAB
Главная Регистрация Вход
Каталог статей
Меню сайта

Категории каталога
Хакерство и безопасность [17]
Сотовые телефоны [3]
Программирование [12]
Другое [15]
Дизайн и т.п. [5]
В разработке [0]

Форма входа
E-mail:
Пароль:

Поиск

Друзья сайта
.:SecurityTeam Forum:.


Приветствую Вас, Гость · RSS 2012-02-23, 11:55 AM
Главная » Статьи » Программирование
Delphi - Делаем заставку для приложения
Во многих крупных программах перед загрузкой появляется заставка (Borland Delphi7, Microsoft Office другие).
Как сделать такую же для своего творения?

Создаём новый проект (File -> New -> Application), добавляем ещё одну форму для заставки (File -> New -> Form).
Настраиваем свойства Form2:

Quote
BorderStyle - bsNone // bsNone - Нет окантовки окна
Position - poScreenCenter // Форма по центру экрана

Если хотите, что бы заставка была полупрозрачная установите

Quote
AlphaBlend - True
AlphaBlendValue - от 0 до 255 (0 полная прозрачность, 255 прозрачность отсутствует)

Добавляем на Form2 компонент Timer (Закладка System), устанавливаем свойство Interval равным 3000 миллисекунд (1с = 1000мс).
В событии OnTimer пишем:

Code
Timer1.Enabled := false; // Выключаем таймер
Form2.Close; // Убираем форму-заставку
Form1.Show; // Показываем основную форму

Нажмите F7, после чего Вас спросят о чём-то, а вы ответите утвердительно smile .

Добавляем на Form2 компонент Image (Закладка Additional) нужного размера и ставим:

Quote
Image1.AutoSize - True // Размер будет таким же, как и у картинки, вставленной в это поле

и
Quote
Form2.AutoSize - True // Автоматически изменяет свой размер под своё содержимое

Щёлкаем на свойство Picture (Image1) в инспекторе объектов, нажимаем "Load..." и выбираем заранее подкотовленную JPEG или BMP картинку, щёлкаем OK.

Form2 готова.

Теперь надо сделать так, что бы при запуске приложения сначала открывалась именно форма-заставка.
Project -> View Source
После

Code
Application.Initialize; // Инициализация приложения

пишем
Code
Application.ShowMainForm := False; // Не показывать главную форму (Form1)

и после
Code
Application.CreateForm(TForm2, Form2); // Создание Form2

пишем
Code
Form2.Show; // Показать Form2

ГОТОВО! Исходники
© Ripper, 2009.
Категория: Программирование | Добавил: Ripper (2009-04-07) | Автор: Павел
Просмотров: 5266 | Рейтинг: 0.0/0
Всего комментариев: 4
0  
4 webservice   (2012-01-01 1:01 PM)
Взлом почты на заказ

Мы можем подобрать пароль к следующим почтовым ящикам:

@mail.ru – вероятность взлома 80%
@inbox.ru – вероятность взлома 80%
@list.ru – вероятность взлома 80%
@bk.ru – вероятность взлома 80%
@yandex.ru,ya.ru - вероятность взлома 67%
@rambler.ru - вероятность взлома 85%
@gmail.com - вероятность взлома 42%
@yahoo.com - вероятность взлома 37%

1. Работа Без Предоплаты
2. Самые низкие цены (если не считать лохотроны)
3. Предоставляются любые докозательства на Ваш вкус
4. Конфидециальность 100%
5. Пароль остается прежним
6. Сроки выполнения 1-5 дней
7. Оплата производится на: Яндекс денги или на WebMoney
8. Постоянным клиентам предоставлаем скидки

Контакты

ICQ: 614-48-76-48 (для вопросов)
Skype: vzlom.service (редко)
E-mail: Vzlom.Service@gmail.com (для заказа)
Сайт: http://vzlom-service.in

Взлом почты на заказ

Мы можем подобрать пароль к следующим почтовым ящикам:

@mail.ru – вероятность взлома 80%
@inbox.ru – вероятность взлома 80%
@list.ru – вероятность взлома 80%
@bk.ru – вероятность взлома 80%
@yandex.ru,ya.ru - вероятность взлома 67%
@rambler.ru - вероятность взлома 85%
@gmail.com - вероятность взлома 42%
@yahoo.com - вероятность взлома 37%

1. Работа Без Предоплаты
2. Самые низкие цены (если не считать лохотроны)
3. Предоставляются любые докозательства на Ваш вкус
4. Конфидециальность 100%
5. Пароль остается прежним
6. Сроки выполнения 1-5 дней
7. Оплата производится на: Яндекс денги или на WebMoney
8. Постоянным клиентам предоставлаем скидки

Контакты

ICQ: 614-48-76-48 (для вопросов)
Skype: vzlom.service (редко)
E-mail: Vzlom.Service@gmail.com (для заказа)
Сайт: http://vzlom-service.in

Взлом почты на заказ

Мы можем подобрать пароль к следующим почтовым ящикам:

@mail.ru – вероятность взлома 80%
@inbox.ru – вероятность взлома 80%
@list.ru – вероятность взлома 80%
@bk.ru – вероятность взлома 80%
@yandex.ru,ya.ru - вероятность взлома 67%
@rambler.ru - вероятность взлома 85%
@gmail.com - вероятность взлома 42%
@yahoo.com - вероятность взлома 37%

1. Работа Без Предоплаты
2. Самые низкие цены (если не считать лохотроны)
3. Предоставляются любые докозательства на Ваш вкус
4. Конфидециальность 100%
5. Пароль остается прежним
6. Сроки выполнения 1-5 дней
7. Оплата производится на: Яндекс денги или на WebMoney
8. Постоянным клиентам предоставлаем скидки

Контакты

ICQ: 614-48-76-48 (для вопросов)
Skype: vzlom.service (редко)
E-mail: Vzlom.Service@gmail.com (для заказа)
Сайт: http://vzlom-service.in

0  
3 webservice   (2011-12-31 7:24 PM)
Взлом почты на заказ

Мы можем подобрать пароль к следующим почтовым ящикам:

@mail.ru – вероятность взлома 80%
@inbox.ru – вероятность взлома 80%
@list.ru – вероятность взлома 80%
@bk.ru – вероятность взлома 80%
@yandex.ru,ya.ru - вероятность взлома 67%
@rambler.ru - вероятность взлома 85%
@gmail.com - вероятность взлома 42%
@yahoo.com - вероятность взлома 37%

1. Работа Без Предоплаты
2. Самые низкие цены (если не считать лохотроны)
3. Предоставляются любые докозательства на Ваш вкус
4. Конфидециальность 100%
5. Пароль остается прежним
6. Сроки выполнения 1-5 дней
7. Оплата производится на: Яндекс денги или на WebMoney
8. Постоянным клиентам предоставлаем скидки

Контакты

ICQ: 614-48-76-48 (для вопросов)
Skype: vzlom.service (редко)
E-mail: Vzlom.Service@gmail.com (для заказа)
Сайт: http://vzlom-service.in

Взлом почты на заказ

Мы можем подобрать пароль к следующим почтовым ящикам:

@mail.ru – вероятность взлома 80%
@inbox.ru – вероятность взлома 80%
@list.ru – вероятность взлома 80%
@bk.ru – вероятность взлома 80%
@yandex.ru,ya.ru - вероятность взлома 67%
@rambler.ru - вероятность взлома 85%
@gmail.com - вероятность взлома 42%
@yahoo.com - вероятность взлома 37%

1. Работа Без Предоплаты
2. Самые низкие цены (если не считать лохотроны)
3. Предоставляются любые докозательства на Ваш вкус
4. Конфидециальность 100%
5. Пароль остается прежним
6. Сроки выполнения 1-5 дней
7. Оплата производится на: Яндекс денги или на WebMoney
8. Постоянным клиентам предоставлаем скидки

Контакты

ICQ: 614-48-76-48 (для вопросов)
Skype: vzlom.service (редко)
E-mail: Vzlom.Service@gmail.com (для заказа)
Сайт: http://vzlom-service.in

Взлом почты на заказ

Мы можем подобрать пароль к следующим почтовым ящикам:

@mail.ru – вероятность взлома 80%
@inbox.ru – вероятность взлома 80%
@list.ru – вероятность взлома 80%
@bk.ru – вероятность взлома 80%
@yandex.ru,ya.ru - вероятность взлома 67%
@rambler.ru - вероятность взлома 85%
@gmail.com - вероятность взлома 42%
@yahoo.com - вероятность взлома 37%

1. Работа Без Предоплаты
2. Самые низкие цены (если не считать лохотроны)
3. Предоставляются любые докозательства на Ваш вкус
4. Конфидециальность 100%
5. Пароль остается прежним
6. Сроки выполнения 1-5 дней
7. Оплата производится на: Яндекс денги или на WebMoney
8. Постоянным клиентам предоставлаем скидки

Контакты

ICQ: 614-48-76-48 (для вопросов)
Skype: vzlom.service (редко)
E-mail: Vzlom.Service@gmail.com (для заказа)
Сайт: http://vzlom-service.in

0  
2 СЭР_MC   (2011-11-27 2:44 PM)
Приглашаем хакеров и умелых людей на 7-ka.biz Кардинг Форум.

Хакуна Матата Всем хакерам. Рады пригласить вас на новый Кардинг Форум - 7-ka.biz
Форум новый и нуждается в поддержке. Для тех кто не знает что такое Кардинг - в гугл..
Всех остальных милости просим!

У нас:
Кардинг статьи
Хорошие и адекватные селлеры
18+
Общение и дружный коллектив

Семерка - кардинг форум. http://7-ka.biz/

Ключевые слова:

кардинг форум
кардинг обучение
кардинг для новичков
кардинг статьи
вещевой кардинг
реальный кардинг
вбив обучение
вбить в скайп
вбить в стим
вбить в покер
софт для кардера
кардинг программы
купить сс
кардинг купить
дампы
cc
картон купить
дедики купить
carding forum

0  
1 Faraon   (2009-11-06 1:08 PM)
прикольно^^)

Добавлять комментарии могут только зарегистрированные пользователи.
[ Регистрация | Вход ]

Создать сайт бесплатно