Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

расположение кнопок "Свенуть" "Развернуть" "Закрыть" [D7, XP]

delphi_ © (2007-04-18 14:52:00)
как сделать чтоб эти три кнопки были скажем с левой стороны?

{RASkov} (2007-04-18 15:54:00) [1]
> [3] homm © (18.04.07 15:09)
> Не правильный ответ.

А по каким критериям ты оцениваешь правильно или нет? :) Круто, я знаю что "не правильный" ответ дал, на "неправильную" задачу поставленную в вопросе. А что ты хочешь рассказать в начинающих как правильно полностью перерисовать стандартный заголовок окна со стандартными кнопками только в другом их месте? Вперед...
Простой вариант: бросить на форму со стилем bsNone - Label c Align=alTop и расположить спидбатоны куда вздумается, описав их клики стандартным действиям, соответствующим действиям заменяемых стандартных кнопок. У Label определить обработчик OnMouseDown со следующим содержанием:
begin ReleaseCapture; Perform(WM_SYSCOMMAND, $F012, 0); end;
Вместо Label можно и другое придумать....

homm (2007-04-18 15:18:00) [2]
> сделай блуждающие кнопки, каждый раз в новом месте

Пусть они бегают от курора :)

Правильный Вася (2007-04-18 15:15:00) [3]
сделай блуждающие кнопки, каждый раз в новом месте

delphi_ (2007-04-18 15:10:00) [4]
да я че виноват что заказчик так хочет.мне то что

homm (2007-04-18 15:09:00) [5]
> Сам заголовок формы "нарисуй", и кнопки хоть по середине
> сделай... и bsNone.

Не правильный ответ.
Сам заголовок формы нарисуй, то-есть его неклиенсткую часть. RTFM WM_NCPAINT

Ega23 (2007-04-18 15:07:00) [6]

> как сделать чтоб эти три кнопки были скажем с левой стороны?

Убил бы за такую программу. Честное слово убил бы.

{RASkov} (2007-04-18 15:04:00) [7]
А зачем? Этож не удобно юзверю....
Сам заголовок формы "нарисуй", и кнопки хоть по середине сделай... и bsNone.

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »