![]() Главная страница Случайная страница КАТЕГОРИИ: АвтомобилиАстрономияБиологияГеографияДом и садДругие языкиДругоеИнформатикаИсторияКультураЛитератураЛогикаМатематикаМедицинаМеталлургияМеханикаОбразованиеОхрана трудаПедагогикаПолитикаПравоПсихологияРелигияРиторикаСоциологияСпортСтроительствоТехнологияТуризмФизикаФилософияФинансыХимияЧерчениеЭкологияЭкономикаЭлектроника |
Вывод текста
Текст обычно используется для оформления документов, повышения их наглядности и в качестве заголовков объектов, которые не имеют свойств Caption. Текстовая надпись (Label)
Пример установки фокуса на Label1 при нажатии Alt+1 Label1.Caption: =’& 1 Фамилия сотрудника’; Label1.FocusControl: =Edit1; Используя событие OnClick для надписи, можно установить фокус на нужном объекте щелчком мышки на надписи. Пример Procedure TForm1.Label1Click(Sender: TObject); //обработ. щелчка по Label1 Begin If Edit1.CanFocus then Edit1.SetFocus; End; //установка фокуса на Edit1 Надписи можно установить и другими компонентами, например, Edit, указав свойство ReadOnly: =True и Text: =’< текст надписи> ’.
|