Отправляет email-рассылки с помощью сервиса Sendsay
  Все выпуски  

Мастера DELPHI. Новости мира компонент, FAQ, статьи...


Информационный Канал Subscribe.Ru

Ежедневная рассылка сайта Мастера DELPHI

DELPHIMASTER.ru

Выпуск от 30.05.03 09:04

Кое-что из нашей кладовки   |x|
Лучшее из нашего FAQ   |x|
Как показать подсказки "hints" для элементов меню?
В примере создается обработчик события Application.Hint - подсказки меню изображаются на status panel.

Пример:

type
   TForm1 = class(TForm)
       Panel1: TPanel;
       MainMenu1: TMainMenu;
       MenuItemFile: TMenuItem;
       MenuItemOpen: TMenuItem;
       MenuItemClose: TMenuItem;
       OpenDialog1: TOpenDialog;
       procedure FormCreate(Sender: TObject);
       procedure MenuItemCloseClick(Sender: TObject);
       procedure MenuItemOpenClick(Sender: TObject);
   private
       {Private declarations}
       procedure HintHandler(Sender: TObject);
   public
      &! nbsp;{Public declarations}
end;

var
   Form1: TForm1;

implementation

{$R *.DFM}

procedure TForm1.FormCreate(Sender: TObject);
begin
   Panel1.Align := alBottom;
   MenuItemFile.Hint := 'File Menu';
   MenuItemOpen.Hint := 'Opens A File';
   MenuItemClose.Hint := 'Closes the Application';
   Application.OnHint := HintHandler;
end;

procedure TForm1.HintHandler(Sender: TObject);
begin
   Panel1.Caption := Application.Hint;
end;

procedure TForm1.MenuItemCloseClick(Sender: TObject);
begin
   Application.Terminate;
end;

procedure TForm1.MenuItemOpenClick(Sender: TObject);
begin
   if OpenDialog1.Execute then
       Form1.Caption := OpenDialog1.F! ileName;
end;


Источник: Дельфи. Вокруг да около.

»»» Прислать свои комментарии

Обсуждается в конференциях   |x|
  • Кто-нибудь пытался срастить Btrieve и Delphi?
    Если да, то поделитесь опытом, буду очень признателен.
  • Проблема с кодировками (BDE)
    Имеются dbf с полями в досовской кодировке. Если они созданы без явного указания кодировке в заголовке файла (по ...
  • Ответ на звонок
    Здравствуйте, коллеги! Моя проблема - не могу ответить на входящий звонок в голосовом режиме. Я использую TAPI и мне ...
  • Файловый кеш
    Как изменить размер файлового кеша в WinNT 4.0 ?
  • Tray+Reboot
    Завершаю работу на компе, а в трее у меня висит прога. Как можно сделать, чтобы прога закрылась когда пользователь ...
  • Microsoft Office 2000
    Уважаемые, мастера! У меня такой вопрос: как можно добавить в меню любой программы из пакета MS Office(Word, Excel, ...
  • Как обратиться к компоненту через переменную
    Привет всем! Например в переменной типа string имеется имя компонента (наприме Panel1), как через эту переменную ...
У нас большой выбор статей   |x|
DirectX (Игровой SDK) Часть 7
Часть 7 (Использование класса DDCanvas, Улучшение нашего изображения,
А что по поводу палитр?)
Новинки книжного рынка   |x|
Oracle PL/SQL для профессионалов 3-е изд.
Данная книга является наиболее полным руководством по языку PL/SQL, представляющему собой процедурное языковое расширение для SQL. В ней детально рассмотрены основы PL/SQL, структура программы, основные принципы работы с программными данными, а также методика применения операторов и инструкций для доступа к реляционным базам данных. Большое внимание уделяется вопросам безопасности, влиянию объектных технологий на PL/SQL и интеграции PL/SQL с XML и Java.
Автор: Фейерштейн С., Прибыл Б.
Другие сайты о DELPHI   |x|
Домашняя страница Degisy Software
Домашняя страничка разработчиков программы Database Workshop - универсального и мощного редактора баз данных.

» Оценка сайта: 2
Опрос населения :)
Какую ОС вы используете _в_основном_ при написании програм для Win32
»»» Win2k
»»» Win98
»»» WinXP
»»» WinNT
»»» WinMe
»»» Win95
»»» Ни одну из перечисленных
»»» Я не пишу под Win32
»»» Не знаю
Для души

Хокку дня
В праздник по улицам Эдо
Бродят нарядные гейши
И множество вкусных собак...

Афоризмы
Встань, человек! Встань с колен!.. Оторвись от замочной скважины...

Фраза дня
Я умираю, но об этом - позже...

Дурацкие законы (информация предоставлена сайтом kurilka.com)
В Кентуки (США) женщинам запрещено ходить по шоссе в купальном костюме. Исключение- если ее сопровождают по крайней мере двое полицейских или если она вооружена палкой.
В городе Джаспер в Алабаме (США) муж не может колотить жену палкой, диаметр которого больше толщины его большого пальца на руке.

И на закуску коротенький анекдот
Мужик заходит в парикмахерскую:
- Я хочу побриться только с одной стороны. Это должно стоить полцены. Логично?
- Давай, фиг с тобой! Садись. Ну и какую сторону будем брить?
- Наружную!

Фотоприколы.
Начните день с хорошего настроения!
http://www.delphimaster.ru/cgi-bin/prikol.pl?id=23891


На этом позвольте откланяться и пожелать вам удачного дня.
Искренне ваш, Алексей (delphi@mastak.ru)

Добро пожаловать на сайт -= Мастера DELPHI =- 


http://subscribe.ru/
E-mail: ask@subscribe.ru
Отписаться
Убрать рекламу

В избранное