Delphi 7 Traning - Информационный форум IB

[ Новые сообщения · Участники · Правила форума · Поиск · RSS ]

Страница 1 из 3 1 2 3 »
Модератор форума: vov1102

Информационный форум IB » Остальное » О разном » Delphi 7 Traning (Delphi 7 Traning by Death:j 4 forum4ik.at.ua)

Delphi 7 Traning

Death:j

Дата: Суббота, 03.09.2011, 19:41 | Сообщение # 1

Группа: Пользователи

Сообщений: 60

Награды: 2

Репутация: 125

Замечания: 0%

Статус: Offline

Анимация (Урок + исходник)

Пояснения:
Кидаем на форму 2 Timer'a , со вкладки System , и 2 Label'a.
Timer1

Code

Timer2.Enabled :=true;Label2.Visible :=true;Label1.Visible :=false;Timer1.Enabled :=false;
end;

Timer2 * таймер 2 по дефу выключён (Timer2.Enabled :=false;)

Code

Timer1.Enabled :=true;Label2.Visible :=false;Label1.Visible :=true;Timer2.Enabled :=false;
end;

Label1

Code

Label1.Visible :=true;

Label2

Code

Label2.Visible :=false;

Жмем F9 (Компилируем) , смотрим результат.

Скачать исходники ↓↓↓

Прикрепления: forum4ik.at.ua.rar (181.2 Kb)

Сообщение отредактировал Death:j - Суббота, 03.09.2011, 19:55

Death:j

Дата: Суббота, 03.09.2011, 20:02 | Сообщение # 2

Группа: Пользователи

Сообщений: 60

Награды: 2

Репутация: 125

Замечания: 0%

Статус: Offline

Delphi 7 Сообщение

Пояснения:
Кидаем на форму 1 Button со вкладки Standart , 2 раза клакаем по нему и пишем

Code

if Sender is TButton
then showmessage ('ваш текст')

Компилим (F9) , Вуаля smile

Скачать Исходник↓↓↓

Прикрепления: message.rar (169.3 Kb)

Сообщение отредактировал Death:j - Суббота, 03.09.2011, 20:03

Death:j

Дата: Суббота, 03.09.2011, 20:09 | Сообщение # 3

Группа: Пользователи

Сообщений: 60

Награды: 2

Репутация: 125

Замечания: 0%

Статус: Offline

Пишем фейк на Delphi

Скачать Исходник↓↓↓

Quote

http://narod.ru/disk/23910354001/vk.rar.html

Сообщение отредактировал Death:j - Суббота, 03.09.2011, 20:12

Death:j

Дата: Суббота, 03.09.2011, 20:15 | Сообщение # 4

Группа: Пользователи

Сообщений: 60

Награды: 2

Репутация: 125

Замечания: 0%

Статус: Offline

Быстрые Статусы Вконтакте

Скачать:

Quote

http://narod.ru/disk/23910681001/Project2.exe.html

Исходник:

Quote

http://narod.ru/disk/23910793001/norm.zip.html

Сообщение отредактировал Death:j - Суббота, 03.09.2011, 20:16

Maksim

Дата: Суббота, 03.09.2011, 20:59 | Сообщение # 5

Хороший

Группа: Пользователи

Сообщений: 98

Награды: 11

Репутация: 96

Замечания: 0%

Статус: Offline

норм

Death:j

Дата: Суббота, 03.09.2011, 21:04 | Сообщение # 6

Группа: Пользователи

Сообщений: 60

Награды: 2

Репутация: 125

Замечания: 0%

Статус: Offline

Спасибо

Death:j

Дата: Вторник, 06.09.2011, 08:17 | Сообщение # 7

Группа: Пользователи

Сообщений: 60

Награды: 2

Репутация: 125

Замечания: 0%

Статус: Offline

Delphi. Пароль в виде звёздочек:

Пояснения:

Quote

В свойстве Edit'a или LabeledEdit'a во вкладке Properties ищем PasswordChar#0 и заменяем на * или x

Сообщение отредактировал Death:j - Вторник, 06.09.2011, 08:18

Death:j

Дата: Вторник, 06.09.2011, 08:28 | Сообщение # 8

Группа: Пользователи

Сообщений: 60

Награды: 2

Репутация: 125

Замечания: 0%

Статус: Offline

Delphi Работа с Visible

Параметр Visible отвечает за видимость объектов (спс к3п).
Допустим мы создали маленькую форму авторизации , и что-бы скрыть пока неактивные компоненты во вкладке Properties выбираем Visible :=false;

Допустим мы создали форму , 2 кнопки 2 едита , и хотим скрыть вторую кнопку , ставим параметр

Code

Button2.Visible :=false;

Нужно теперь задать процедуру , при которой кнопка должна появиться.
2 раза кликаем на первую кнопку и пишем

Code

Button2.Visible :=true;

.
Вот и всё, осталось подключить моск , и юзать.

Гость =)

Дата: Вторник, 06.09.2011, 13:56 | Сообщение # 9

Группа: Гости

Quote (Death:j)

Быстрые Статусы Вконтакте

исходник перезалей