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

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> установить trackbar внутри statusbara, установить trackbar внутри statusbara 
V
    Опции темы
s2004
Дата 16.4.2012, 19:26 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 174
Регистрация: 30.10.2006

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



вот не думал этот вопрос задать - у меня в проге на embeddedwb (расширенный webbrowser) стоит внизу естесственно statusbar, а справа на нём trackbar что бы пользователь мог изменять масштаб (так же как в опере), тут случайно потёр архив пришлось последние файлы восстановить всё нормально, коды всё хорошо - работают, но вот уже несколько раз пытаюсь этот trackbar установить внутрь statusbar и ничего неполучается, как то получилось у меня в прошлом само собой, что это  вопрос и не возникал.
PM MAIL   Вверх
Akella
Дата 16.4.2012, 19:53 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Творец
****


Профиль
Группа: Модератор
Сообщений: 18485
Регистрация: 14.5.2003
Где: Корусант

Репутация: 36
Всего: 329



ошибка в 17ой строке
PM MAIL   Вверх
northener
Дата 16.4.2012, 20:11 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


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

Репутация: 8
Всего: 20



В FormCreate
Код

  TrackBar1.Parent:=StatusBar1;
  TrackBar1.Top:=2;
 


--------------------
Но только лошади летают вдохновенно.
Иначе лошади разбились бы мгновенно!
PM MAIL   Вверх
s2004
Дата 17.4.2012, 16:24 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 174
Регистрация: 30.10.2006

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



выше привидённый пример не работает, тракбар просто неотражается на панели.
PM MAIL   Вверх
s2004
Дата 17.4.2012, 16:45 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 174
Регистрация: 30.10.2006

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



Akella  благодарю ошибка имено в этих строках anchors, выставил в false. Всё встало на место.
Но вот цвет подправить, тракбар ярко синий, а мне  надо серый. у статуса цвет можно поменять, а тракбаре нет в настройках его чтото не нашёл или он должен наследовать цветовую гамму от статусбара или от выбора цвета формы?
PM MAIL   Вверх
northener
Дата 18.4.2012, 00:43 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


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

Репутация: 8
Всего: 20



<offtop>
А что в каких-то новых версиях Дельфи стандартный статусбар научился принимать на себя контролы в дизайнтайме?
</offtop>

Добавлено @ 00:50
Цитата(s2004 @  17.4.2012,  16:45 Найти цитируемый пост)
Но вот цвет подправить, тракбар ярко синий, а мне  надо серый. у статуса цвет можно поменять, а тракбаре нет

Раньше и у статусбара цвет поменять было невозможно. Приходилось использовать "узаконенные псевдохакерские методы".
Если в вашей версии дельфи (как и в моей Д2007) всё еще не возможно в дизайнере изменить цвет трэкбара, то вам в руки всё тот же "узаконенный псевдохакерский метод":
Код

type
  TMyTrackBar = class(TTrackBar)
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
  TMyTrackBar(TrackBar1).Color:=StatusBar1.Color;
  //Либо TMyTrackBar(TrackBar1).Color:=clGray/clSilver/clBtnFace
end;


Это сообщение отредактировал(а) northener - 18.4.2012, 00:54


--------------------
Но только лошади летают вдохновенно.
Иначе лошади разбились бы мгновенно!
PM MAIL   Вверх
s2004
Дата 18.4.2012, 20:18 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 174
Регистрация: 30.10.2006

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



northener оба варианта изменения цвета не помогли, как был синего цвета тракбар так и остался хотя по логике класс сделали, а там ввели особеность цвета должно было сработать, но не работает цвет неменяется.
PM MAIL   Вверх
northener
Дата 18.4.2012, 20:54 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


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

Репутация: 8
Всего: 20



Цитата(s2004 @  18.4.2012,  20:18 Найти цитируемый пост)
оба варианта изменения цвета не помогли

В точности повторил мой код?


--------------------
Но только лошади летают вдохновенно.
Иначе лошади разбились бы мгновенно!
PM MAIL   Вверх
s2004
Дата 18.4.2012, 20:59 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 174
Регистрация: 30.10.2006

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



разумеется перпробовал оба и тд
PM MAIL   Вверх
northener
Дата 18.4.2012, 21:42 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


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

Репутация: 8
Всего: 20



Мне вот так удалось получить серый трекбар на синем статусбаре.
В дизайнере поставил для статус бара серый цвет, а в FormCreate:
Код

  TrackBar1.Parent:=StatusBar1;
  TrackBar1.Top:=4;
  TMyTrackBar(TrackBar1).ParentBackground:=False;
  TMyTrackBar(TrackBar1).ParentColor:=False;
  StatusBar1.Color:=clAqua;



--------------------
Но только лошади летают вдохновенно.
Иначе лошади разбились бы мгновенно!
PM MAIL   Вверх
s2004
Дата 19.4.2012, 16:12 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 174
Регистрация: 30.10.2006

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



вот теперь цвет сработал, благодарю.
PM MAIL   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Общие вопросы"
SnowyMetalFan
bemsPoseidon
Rrader

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

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

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

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


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

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


 




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


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

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