Модераторы: Poseidon, Snowy, bems, MetalFan
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Кнопки в форме стрелочек, Квадратные кнопки для скрола в TWebbrows 
V
    Опции темы
SAVANE
Дата 3.5.2008, 23:15 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 118
Регистрация: 20.7.2006
Где: Украина, Полтава

Репутация: нет
Всего: 1



Подскажите пожалуйста компонент с симпатичными кнопками разных форм.
Мне нужны триугольные кнопочки с закруглеными краями. Чтоб нормально прорисован процес нажатия (Не вариант рисунок до нажатия и после такой компонент пробывал  Image button 4.0)
Буду очень благодарен за любые подсказки.
--------------------
Be not afraid of growing slowly, be afraid only of standing still!
PM MAIL WWW ICQ   Вверх
Arch1S
Дата 4.5.2008, 00:42 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 72
Регистрация: 14.1.2008
Где: Беларусь, Гомель

Репутация: 1
Всего: 3



XPComPack
Все нижеописанные компоненты выглядят как в Windows XP на любых версиях Windows:
TXPGroupBox - компонент представляет собой TGroupBox в стиле Windows XP;
TXPPanel - компонент представляет собой TPanel в стиле Windows XP;
TXPButton - компонент представляет собой TButton в стиле Windows XP;
TXPEdit - компонент представляет собой TEdit в стиле Windows XP;
TXPCheckBox - компонент представляет собой TCheckBox в стиле Windows XP;
TXPRadioButton - компонент представляет собой TRadioButton в стиле Windows XP;
TXPLabel - компонент представляет собой TLabel в стиле Windows XP, подписи такого вида используются па заголовках большинства окон.
Что касается моего мнения: явно не хватает компонента TXPForm - то есть все эти элементы немного нелепо выглядят в не WinXP, а вот когда запускаешь программу в WinXP - получается очень красиво.

я всегда его использую
PM MAIL   Вверх
aktuba
Дата 4.5.2008, 01:10 (ссылка) |    (голосов:1) Загрузка ... Загрузка ... Быстрая цитата Цитата


Смышленный
***


Профиль
Группа: Завсегдатай
Сообщений: 1915
Регистрация: 24.4.2006
Где: Планета Земля

Репутация: 16
Всего: 38



Цитата(SAVANE @  4.5.2008,  00:15 Найти цитируемый пост)
Подскажите пожалуйста компонент с симпатичными кнопками разных форм.

А самому сделать, религия не позволяет?


--------------------
user posted image
PM MAIL WWW Skype   Вверх
SAVANE
Дата 4.5.2008, 15:57 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 118
Регистрация: 20.7.2006
Где: Украина, Полтава

Репутация: нет
Всего: 1



Цитата

А самому сделать, религия не позволяет?


Религия позволяет, знания нет!!!
Потому подсказывай, коль пост кинул!!! smile 
--------------------
Be not afraid of growing slowly, be afraid only of standing still!
PM MAIL WWW ICQ   Вверх
aktuba
Дата 4.5.2008, 17:18 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Смышленный
***


Профиль
Группа: Завсегдатай
Сообщений: 1915
Регистрация: 24.4.2006
Где: Планета Земля

Репутация: 16
Всего: 38



Цитата(SAVANE @  4.5.2008,  16:57 Найти цитируемый пост)
Потому подсказывай, коль пост кинул!!! smile  

Подсказываю: у любой кнопки, минимум, 3 статуса:
1. Нормальное состояние.
2. Активное состояние (навели вышку, например).
3. Нажатое состояние.

Если сделать 3 картинки - уже можно сделать свою кнопку ;)
А можно пойти дальше - сделать картинки для переходов между состояниями и воспроизводить их в виде анимации. Смотреться, при должном умении, будет отлично. Пример - picasa от гугла, посмотри как реагируют кнопки при наведении и нажатии. Я как-то воспроизводил подобное в одной из программ...



--------------------
user posted image
PM MAIL WWW Skype   Вверх
EvilsInterrupt
Дата 4.5.2008, 18:01 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Executables research
***


Профиль
Группа: Завсегдатай
Сообщений: 1019
Регистрация: 14.7.2007
Где: Железнодорожный, МО, Россия

Репутация: 3
Всего: 9



Цитата(aktuba @  4.5.2008,  17:18 Найти цитируемый пост)
в одной из программ...

Какой ? ;)
PM MAIL WWW ICQ Jabber   Вверх
aktuba
Дата 4.5.2008, 18:30 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Смышленный
***


Профиль
Группа: Завсегдатай
Сообщений: 1915
Регистрация: 24.4.2006
Где: Планета Земля

Репутация: 16
Всего: 38



Цитата(EvilsInterrupt @  4.5.2008,  19:01 Найти цитируемый пост)
Какой ? ;) 

секрет ;)


--------------------
user posted image
PM MAIL WWW Skype   Вверх
ivan219
  Дата 4.5.2008, 21:29 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1121
Регистрация: 19.11.2005
Где: Планета земля

Репутация: 2
Всего: 12



Как вареант сделать наследника от TButton с регеонами только монотонно будет выглядеть.
PM MAIL ICQ   Вверх
ivan219
  Дата 4.5.2008, 22:00 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1121
Регистрация: 19.11.2005
Где: Планета земля

Репутация: 2
Всего: 12



А вот и пример круглой кнопки удаляем Cption ставим свою Glips:
Код

unit RegButton;

interface

uses
  Windows, Messages, SysUtils, Classes, Controls, StdCtrls, Buttons;

type
  TRegButton = class(TBitBtn)
  private
    procedure WMPaint(var Message: TWMPaint); message WM_PAINT;
  protected
    { Protected declarations }
  public

  published

  end;

procedure Register;

implementation

procedure Register;
begin
  RegisterComponents('MyComponent', [TRegButton]);
end;

{ TRegButton }

procedure TRegButton.WMPaint(var Message: TWMPaint);
var
  R: hRGN;
begin
 Inherited;
 R:=CreateEllipticRgn(5,5,ClientWidth - 4,ClientHeight - 4); // Разные функции дадут разный результат
 try
  SetWindowRgn(Handle,R,True);
 finally
  DeleteObject(R);
 end;
end;

end.

Поиграф с разными функциями CreateEllipticRgn (искать по слову регионы) и Glips можно добится чего хошь.
В архиве пример как использовать.

Это сообщение отредактировал(а) ivan219 - 4.5.2008, 22:38

Присоединённый файл ( Кол-во скачиваний: 6 )
Присоединённый файл  RegButton.rar 2,28 Kb
PM MAIL ICQ   Вверх
SAVANE
Дата 7.5.2008, 21:03 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 118
Регистрация: 20.7.2006
Где: Украина, Полтава

Репутация: нет
Всего: 1



ivan219
ПРобывал твой код, если чесно не получилось. 
Я нашел для себя компонент MCoP прикольный, форма кнопки получается по форме рисунка.
Единственое что я рисовать ваще не умею, но пришлось учится рисовать.
--------------------
Be not afraid of growing slowly, be afraid only of standing still!
PM MAIL WWW ICQ   Вверх
ivan219
  Дата 7.5.2008, 22:21 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1121
Регистрация: 19.11.2005
Где: Планета земля

Репутация: 2
Всего: 12



Цитата(SAVANE @  7.5.2008,  21:03 Найти цитируемый пост)
ПРобывал твой код, если чесно не получилось. 

Код в топике это компонент нужно скопировать в созанный Unit и переименовать его RegButton или в текстовый фаил и переимероват сам фаил так RegButton.pas после чего установить как обычный компонент, после воспользуйса примером ничего сложного нет.
Цитата(SAVANE @  7.5.2008,  21:03 Найти цитируемый пост)
Я нашел для себя компонент MCoP

А где взял???
PM MAIL ICQ   Вверх
SAVANE
Дата 8.5.2008, 12:32 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 118
Регистрация: 20.7.2006
Где: Украина, Полтава

Репутация: нет
Всего: 1



На торри. нет поищи. Я чесно не помню в гугле случайно по моему нашел. 
Если нужно будет то выложу где нить на фтп
--------------------
Be not afraid of growing slowly, be afraid only of standing still!
PM MAIL WWW ICQ   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Общие вопросы"
SnowyMetalFan
bemsPoseidon
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Общие вопросы | Следующая тема »


 




[ Время генерации скрипта: 0.0495 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.