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

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> StatusBar, как правельно переделать? 
:(
    Опции темы
kind_programmer
Дата 28.5.2007, 10:15 (ссылка) | (голосов:1) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



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

Репутация: нет
Всего: нет
Есть маленькая заморочка.

Знаю как прикрепить StatusBar к одной странице, но если присутствую вкладки, то тут уже проблема  smile 
Эксперементировал по разному, дошло до того, что взял пример с предыдушей моей темы:
Цитата

TStatusBar(PageControl.ActivePage.Controls[0]).SimpleText := Text;  
  smile 

Естественно оно не работает, как правельно сделать, что я не так делаю?  smile 
И  ПОЧЕМУ?  smile 
PM MAIL   Вверх
maniaks1
Дата 28.5.2007, 10:37 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


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

Репутация: нет
Всего: нет
А статус бар ты как создаёшь?

Лучше сделай один, на все закладки.
А при их смене:
Код

  StatusBar1.SimpleText:=TWebBrowser(PageControl.ActivePage.Controls[0]).что то
PM MAIL ICQ   Вверх
Sunvas
Дата 28.5.2007, 10:38 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Соль и сахар
****


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

Репутация: 28
Всего: 89
Код

statusbar1.Panels[1].Text:='Text';



--------------------
Воспитывая детей по своему образу и подобию, родители почему-то надеются, что они будут лучше их.
PM MAIL   Вверх
kind_programmer
Дата 28.5.2007, 12:13 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



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

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

statusbar.Panels[0].Text:='Text';


Тут не катит, не показывает ничего...причина незнаю в чем, так сколько и не бился не смог разобраться! smile 

Цитата
StatusBar.SimpleText:=TWebBrowser(PageControl.ActivePage.Controls[0]).что то


"Что то" - это что? Можно немножко по конкретней, что можно сюда дабавить, а то я запутался, подставляю чёрти-что. smile 
PM MAIL   Вверх
Sunvas
Дата 28.5.2007, 12:48 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Соль и сахар
****


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

Репутация: 28
Всего: 89
Цитата(kind_programmer @  28.5.2007,  12:13 Найти цитируемый пост)
Тут не катит, не показывает ничего...причина незнаю в чем, так сколько и не бился не смог разобраться! 

Правой кнопкой на statusbar-e, переходи в panels editor, там создай панели. После этого, должно работать.


--------------------
Воспитывая детей по своему образу и подобию, родители почему-то надеются, что они будут лучше их.
PM MAIL   Вверх
kind_programmer
Дата 28.5.2007, 14:45 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



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

Репутация: нет
Всего: нет
Цитата
Правой кнопкой на statusbar-e, переходи в panels editor, там создай панели. После этого, должно работать.


Я это знаю....первым же делом замутил. Но в том то и загвостка, что не пашет. Если бы я знал почему....
Может есть другие варианты решения данной проблемы?
PM MAIL   Вверх
maniaks1
Дата 28.5.2007, 17:00 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


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

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

  "Что то" - это что? Можно немножко по конкретней, что можно сюда дабавить, а то я запутался, подставляю чёрти-что.  

Смотря чего тебе надо... Я подумал что ты состояние WebBrowser'a хотел отобразить...

В общем лучше делай не через SimpleText, а создавай панель и уже при смене закладок, будет такой код:

TStatusBar(PageControl1.ActivePage.Controls[0]).Panels[0].Text:= Вот тут то что надо тебе отобразить

К примеру имя закладки на которой StatusBar:

TStatusBar(PageControl1.ActivePage.Controls[0]).Panels[0].Text:= PageControl1.ActivePage.Caption;


P.S. Не забудь создать панели на всех StatusBar.
PM MAIL ICQ   Вверх
kind_programmer
Дата 28.5.2007, 17:15 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



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

Репутация: нет
Всего: нет
maniaks1, О-о-о-о-отлично!  Спасиб.....поробуем замутить.
PM MAIL   Вверх
kind_programmer
Дата 28.5.2007, 18:50 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



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

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

подумал что ты состояние WebBrowser'a хотел отобразить...


А как в данном случае? 
StatusBar.SimpleText:=TWebBrowser(PageControl.ActivePage.Controls[0]). продолжение дальше какое?

Что-то я с этим конструктором statusbar'а, вообще, к нулю пришел, все перепутал....надо проще работать! 
PM MAIL   Вверх
kind_programmer
Дата 29.5.2007, 17:04 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



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

Репутация: нет
Всего: нет
Ну, сможете прояснить мозГ, а то тема покоя мне не дает....?
PM MAIL   Вверх
maniaks1
Дата 29.5.2007, 21:36 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


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

Репутация: нет
Всего: нет
Ну если ты делаешь веб браузер с закладками, то наверное ты хотел отобразить статус браузера...
Мне лично так показалось...

Код

  TStatusBar(PageControl1.ActivePage.Controls[0]).Panels[0].Text:= TWebBrowser(PageControl.ActivePage.Controls[0]). StatusText;
PM MAIL ICQ   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Общие вопросы"
SnowyMetalFan
bemsPoseidon
Rrader

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

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

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

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

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Общие вопросы | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




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


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

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