Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2002.01.08;
Скачать: [xml.tar.bz2];

Вниз

TStatusBar   Найти похожие ветки 

 
Gayrus   (2001-12-17 03:52) [0]

Как в Statusbar"e вставить что-то вроде ProgressBar, как у IE
внизу?


 
Builder   (2001-12-17 03:55) [1]

Нужно создать прогрессбар динамически, обязательно присвоить ему парента statusbar, указать положение и пользоваться.


 
Gayrus   (2001-12-17 03:58) [2]

НЕ понял(динамически?), я пробовал положить ProgressBar сверху но если форма меняет размеры...


 
KSergey   (2001-12-17 08:29) [3]

Это нельзя сделать в дизайнере форм. Только создавая динамически, т.е. во время выполенения программы.
Как? А как и любой другой компонент. Читайте статью на "Королевстве" "Жизнь и смерть в ржиме run-time"
Или, если нужен результат, возьмите готовую компоненту. Их горы таких! (см. архив новостей компонент. правда именно таких давно не попадалось, но в архиве найти можно запросто. ну или сразу на торри идти и выбирать статусбар по вкусу)


 
Dmitriy(new)   (2001-12-17 09:37) [4]

procedure TForm1.FormCreate(Sender: TObject);
begin
Gauge2:=TGauge.Create(StatusBar1);
with Gauge2 do begin
Parent := StatusBar1;
Progress:=0;
Top := 7;
Left := 15;
Height := StatusBar1.Height - Top-3;
Width := StatusBar1.Panels[0].Width - 20;
end;
end;



Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2002.01.08;
Скачать: [xml.tar.bz2];

Наверх















Память: 0.82 MB
Время: 0.034 c
1-22057
AlexeyV
2001-12-19 03:34
2002.01.08
Как вызвать диалог


14-22384
Alien
2001-11-07 08:13
2002.01.08
Поклонникам TV-6 и шоу


14-22362
MIFI
2001-11-04 02:34
2002.01.08
как найти человека


1-22264
Анатолий
2001-12-17 06:36
2002.01.08
Chart


1-22003
Virtualik
2001-12-17 16:09
2002.01.08
TListItems





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский