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

Вопрос:

Как изменить стиль шрифта RichEdit нажатиями соответствующих комбинаций клавиш? (например включить курсив по нажатию Ctrl + I)

Ответ:
В примере стили шрифта меняются по нажатию след. комбинаций клавиш
	Ctrl + B - вкл/выкл жирного шрифта
	Ctrl + I - вкл/выкл наклонного шрифта
	Ctrl + S - вкл/выкл зачеркнутого шрифта
	Ctrl + U - вкл/выкл подчеркнутого шрифта Прочитать остальную часть записи »

Вопрос:

Можно ли изменить вид текстового курсора (каретки) edit'а или другого элемента
управления Windows?

Ответ:

Можно! В примере показано
как создать два цветных “bitmap’а”: “улыбчивый” и “хмурый” и присвоить их курсору
edit’а. Для этого нужно перехватить оконную процедуру edit’а. Чтобы сделать
это заменим адрес оконной процедуры Edit’а нашим собственным, а старую оконную
процедуру будем вызывать по необходимости. Пример показывает “улыбчивый” курсор
при наборе текста и “хмурый” при забое клавишей backspace. Прочитать остальную часть записи »

Вопрос:
Как настроить табуляцию в компоненте TMemo?

Ответ:

Пошлите в Memo сообщение
EM_SETTABSTOPS. Например установим первую позицию табуляции на 20-й пиксел. Прочитать остальную часть записи »

Как скрыть форму при старте приложения?

К сожалению при создании окна приложения ни в одном из первых событий (OnCreate,
OnShow, OnActivate) нет доступа к свойству Visible. Использование функции
ShowWindow с параметром SW_HIDE в OnActivate-событии решает проблему (но
при этом не избежать кратковременного мерцания окна перед “исчезновением”):

procedure TForm1.OnActivate(Sender: TObject);
begin
  ShowWindow(Handle, SW_HIDE);
end;

чтобы сделать окно опять видимым необходимо вызвать ту же функцию, но уже
с другим параметром:

  ShowWindow(Handle, SW_SHOW); Прочитать остальную часть записи »

Как сделать возможным передвижение формы, если пользователь щелкнул
в форму вне пространства заголовка?

В следующем примере показано как можно передвигать форму если пользователь
“захватил” Client-пространство. Наиболее простое решение – “обмануть” Windows
и Client-пространство выдать за заголовок окна.

unit DragMain;
interface

uses

  SysUtils, WinTypes, WinProcs,  Messages,

  Classes, Graphics, Controls, Forms, Dialogs, StdCrtls; Прочитать остальную часть записи »