Вопрос и Ответ 14 < Вопросы и Ответы по Delphi < Delphi

Новые книги

Вопросы истории: UNIX, Linux, BSD и другие

Это попытка последовательного изложения истории UNIX, Linux и свободных ОС вообще, а также связанных с ними графических интерфейсов. Она разделяется на три части: в первой рассматривается история UNIX-подобных операционных систем, во второй – дистрибутивов Linux, в третьей – их интерфейсов. Основана на печатных и сетевых материалах, воспоминаниях очевидцев, устной традиции и личных впечатлениях.

Длинный хвост. Новая модель ведения бизнеса

Крис Андерсон открыл золотую жилу. Суть открытия проста — современная дистрибуция заточена под торговлю популярными товарами и неэффективна.

Спрос на малоизвестные продукты так мал, что делает бессмысленным их производство и распространение. Но суммарная стоимость малоизвестных товаров в миллионы раз превышает стоимость хитов. А когда каждый потребитель может найти информацию о любом товаре — будущее любой индустрии связано с узкими нишевыми рынками. Нужны лишь инструменты, позволяющие учитывать желания каждого конкретного человека.

Эта книга (одна из наиболее значимых книг о бизнесе последнего десятилетия) предлагает такие инструменты. Вполне рабочие, проверенные на практике. Идея «длинного хвоста» применима к интернет-торговле, издательскому бизнесу, музыке, киноиндустрии, производству игрушек, кухонных принадлежностей, рекламе… к чему угодно.

Книга предназначена для предпринимателей и людей, желающих знать свое будущее.

Вопрос и Ответ 14

Версия для печати

Вопросы и Ответы

14. Как используя поля Hint создать строку подсказки?

Для отображения текста подсказки любого объекта, в строке подсказки, в зависимости от того над каким элементом управления или пунктом меню находится мышь, необходимо следующее:

создать процедуру, которая будет выводить подсказку на экран;
присвоить обработчику события Hint объекта Application эту процедуру.

В строку подсказки будет выводиться любой текст, находящийся в поле Hint, независимо от состояния ShowHint. Можно использовать две различных подсказки для одного элемента или пункта меню. Они должны разделяться символом '|'. Первая часть появится рядом с элементом (если ShowHint=True), а вторая - в строке подсказки. В случае одного варианта - он будет использоваться в обоих случаях.

Пример:

Для вывода текста подсказки используется Label1.

............

{описание собственной процедуры AppHint}

public

PROCEDURE AppHint(Sender: TObject);

............

{присвоение событию Hint имени нашей процедуры AppHint}
procedure TForm1.FormCreate(Sender: TObject);
begin

Application.OnHint := AppHint;

end;

............

{вывод подсказки на экран}
PROCEDURE TForm1.AppHint(Sender: TObject);
BEGIN

Label1.Caption := Application.Hint;

END;

............

...предыдущая страница следующая...
оглавление