Kylix. Работа с компонентами

Xakep, номер #032, стр. 032-076-2

На старт...

Запусти Kylix. Как и в Delphi, перед тобой открывается похожее окно и пустой проект. Сохрани его. Для этого (как и в Delphi) тебе надо выбрать "Save All" из меню "File". Сначала тебя запросят сохранить модуль главного окна, а потом и сам проект.

Теперь приступим. Брось на форму кнопку Button, она находится на закладке "Standard" палитры компонентов. Желательно поставить ее посередине формы. Красиво? Щаззз будет еще красивше :). Выдели кнопку и перейди а окно Object Inspector (объектный инспектор). Давай осмотримся. Как видишь, ничего страшного тут нет. Никаких монстров и врагов государства :), только буквы и какие-то слова. Все это свойства нашей пимпы.

Давай изменим свойство Caption. Оно отвечает за текст, который будет отображен на кнопке. По умолчанию оно равно "Button1". Давай изменим его на более стоящее, например, "Pimpa". Текст на кнопке моментально изменился на "Pimpa".

Ой, я забыл предупредить: мне приходится писать все на английском, потому что у меня Kylix-бета от дяди Митина. Бета слишком ранняя, а поддержку русского языка в Kylix включили только в последний момент, перед самым релизом. Вот что значит использование левых копий.

Немного отклонились, пора вернутся к нашим плюшкам. Больше никакие свойства мы менять не будем. Можешь просто осмотреться, но больше ничего особенного здесь нет. Единственное, на что ты должен обратить внимание, так это на свойство Name (по умолчанию оно равно "Button1"). Через него ты будешь обращаться к кнопке.

Ловим нажатие на кнопку

Теперь нам надо поймать момент, когда пользователь нажмет на кнопку. Как я уже говорил в прошлом номере Х, все компоненты могут генерировать события, и они находятся на закладке Events объектного инспектора. Перейди туда. Найди тут строку OnClick. Это и есть событие, когда нажали кнопку. Дважды щелкни в строке напротив этого события, и Kylix создаст процедуру Button1Click. Эта процедура будет вызываться каждый раз, когда ты нажимаешь на кнопку.

В листинге 1 я показал то, что нужно написать в этой процедуре. Здесь нет ничего сложного, только одна строчка: Application.MessageBox('You a genius.', 'Uraaaa', [smbOK]). Эта строка выводит окно с сообщением "You a genius". Сейчас я постараюсь тебе объяснить, что написано в этой строке. Первое слово "Application" - это ссылка на объект ТApplication. Этот объект всегда создается автоматически при запуске программы. У него есть много полезных свойств и методов, и ко всем ты сможешь получить доступ. Для этого нужно написать имя объекта - Application, потом поставить точку, и Delphi сама тебе покажет все его возможности. Я выбрал метод MessageBox. Это процедура, которая выводит на экран окно сообщение. Этой процедуре надо передать три параметра (они перечислены в скобках) текст сообщения, заголовок окна и какие кнопки отображать. Все параметры перечисляются в скобках после имени метода через запятую.