Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 11.05.2008, 13:12   #1
Fantom
Пользователь
 
Аватар для Fantom
 
Регистрация: 10.05.2008
Сообщений: 41
По умолчанию Прог.код

что означает программный код:

var
Btn: Tbutton;
begin
Btn:=Sender as TButton;
Fantom вне форума Ответить с цитированием
Старый 11.05.2008, 13:54   #2
_Dmitry
Участник клуба
 
Аватар для _Dmitry
 
Регистрация: 02.09.2007
Сообщений: 1,193
По умолчанию

Ссылка на кнопку, для которой произошло событие.
Например, у вас может быть несколько кнопок и один обработчик события OnClick для всех
Код:
procedure TForm1.ButtonsClick(Sender: TObject);
var
  Btn: Tbutton;
begin
  Btn:=Sender as TButton;
..........
в этом случае Btn - это кнопка, которую нажал юзверь.
_Dmitry вне форума Ответить с цитированием
Старый 11.05.2008, 14:22   #3
Fantom
Пользователь
 
Аватар для Fantom
 
Регистрация: 10.05.2008
Сообщений: 41
По умолчанию

Но Btn-описана как переменная, описана классом Tbutton. И потом этой переменной присваивается непонятно что...
Fantom вне форума Ответить с цитированием
Старый 11.05.2008, 14:34   #4
_Dmitry
Участник клуба
 
Аватар для _Dmitry
 
Регистрация: 02.09.2007
Сообщений: 1,193
По умолчанию

Еще раз прочитайте пост #2 и посмотрите пример.
Вложения
Тип файла: zip Buttons.zip (1.8 Кб, 15 просмотров)
_Dmitry вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Пишу прог на Дельфи под заказ!!! Sanek777 Фриланс 1 31.08.2008 23:22
хoчу прог. реализацию создания TF IDF образа документа newsTester Общие вопросы Delphi 0 01.04.2008 01:08
Несколько прог, цена договорная!!! SeveNDragonS Фриланс 7 27.12.2007 07:56