Мой DELPHI – Программирование

Вопрос:
Как изменить шрифта hint'а?
Ответ:
В примере перехватывается событие Application.OnShowHint и изменяется шрифт Hint'а. Прочитать остальную часть записи »

Вопрос:

Некоторые компоненты баз данных (и среди них TDBGrid) никак не меняют визуальных свойств, когда к ним отключен доступ (disabled). Как это изменить програмно?

Ответ:

Ниже приведен пример,
меняющий цвет шрифта на clGray, когда доступ к элементу управления (в данном
случае TDBGrid) запрещен (disabled). Прочитать остальную часть записи »

Вопрос:
Как изменить число фиксированных колонок в TDbGrid?
Пример:

procedure TForm1.Button1Click(Sender: TObject);
begin
	TStringGrid(DbGrid1).FixedCols := 2;
end;

Вопрос:
Как выполнить какой-то процесс тогда, когда пользователь не работает с моим приложением?

Ответ:
Создайте процедуру, которая будет вызываться при событии Application.OnIdle.

Обьявим процедуру:
{Private declarations}
procedure IdleEventHandler(Sender: TObject; var Done: Boolean);

В разделе implementation опишем поцедуру:

procedure TForm1.IdleEventHandler(Sender: TObject; var Done: Boolean);
begin
	{Do a small bit of work here}
	Done := false;
end;

В методе Form'ы OnCreate - укажем что наша процедура вызывается на событии
Application.OnIdle.

Application.OnIdle := IdleEventHandler;

Событие OnIdle возникает
один раз – когда приложение переходит в режим “безделья” (idle). Если в обработчике
переменной Done присвоить False событие будет вызываться вновь и вновь, до тех
пор пока приложение “бездельничает” и переменной Done не присвоенно значение
True.

Вопрос:
Как при проигрывании музыки с Audio CD показывать сколько прошло минут и секунд?
Ответ:
В примере время выводится по таймеру. Прочитать остальную часть записи »