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

Вниз

Помогите, плиз...   Найти похожие ветки 

 
UserL   (2002-01-29 08:27) [0]

Кинул на форму ToolBar и наделал кнопачек га нем. Нада чтоб одна кнопка, при изменении размеров формы была всегда с правой стороны формы. Как ето седлать?
Я пробовал кинуть панель на ToolBar и менять
Panel.Width:=ClientWidth-(Количество кнопок*Width кнопок).
Но при восстановлении формы из развернутого состояния в окно, кнопка, которая находится справа, исчезает. ;о((
Помогите, мастера.......


 
MBo   (2002-01-29 08:43) [1]

включи в ее anchors вместо akLeft akRight
(если Delphi не старые)


 
UserL   (2002-01-29 08:48) [2]

У панели ето включено, а у кнопки (TToolButton)такого свойства нету. Но всеравно не работает...


 
MBo   (2002-01-29 08:54) [3]

ага,сначала ня не уловил.
вставь перед нужной кнопкой сепаратор и что-нибудь типа
procedure TForm1.FormResize(Sender: TObject);
begin
toolbutton4.Width:=width div 2;//toolbutton4-сепаратор
end;


 
Gennady   (2002-01-29 09:59) [4]

а может проще самому там ту кнопку нарисовать?


 
UserL   (2002-01-29 10:36) [5]

Если ставиш сепаратор, то совсем лажа получается...
После первого восстановления окна из развернутого окна, все кнопки сбиваются в одну кучу, а сепаратор получается слева...


 
UserL   (2002-01-29 10:37) [6]

А как нарисовать?


 
Johnny   (2002-01-29 11:58) [7]

Тот же самый глюк, хотя я их вообще не трогаю. Тоже после изменения окна начинают двигаться как захотят. Все это на MDI форме, на обычной не пробовал.


 
Gennady   (2002-01-29 12:11) [8]

DrawEdge - для бордера кнопки
DrawText - для текста кнопки

но следует учесть, что при изменении размера окна нужно снова прорисовывать тулбар. при наведении мышкой(если Flat) и при клике нужно тоже делать соответствующую прорисовку, дабы "кнопка" ничем не отличалась от настоящей.




 
Miwa   (2002-01-29 12:20) [9]

А как вам такой вариант?

procedure TForm1.FormResize(Sender: TObject);
begin
button1.Left:=Width - 10 - button1.Width;
end;

"10" - это просто чтобы кнопка была немножко смещена от края формы.


 
UserL   (2002-01-31 07:20) [10]

> Miwa ©
Позицирование слева или с права на TToolBar`е не работает почемуто... Все кнопки становятся рядом друг с другом, выравниваясь по левому краю...

Мож кто подскажет компонент (Кнопку) чтобы был рисунок с верху а подпись снизу на кнопке?


 
MBo   (2002-01-31 07:34) [11]

BitBtn, SpeedButton


 
UserL   (2002-01-31 08:31) [12]

> MBo ©
Спасибо... Нада было у этих кнопок свойство Layout поставить
в blGlyphTop.




 
Shirson   (2002-01-31 09:32) [13]

Ставишь панель
Ровняешь ее как Top
В нее вставляешь тулбар со своей кнопкой, ровняешь его правому краю, делаешь кнопку, уменьшаешь размеры тулбара или ставишь ему автосайз.
Засовываешь в панель еще один тулбар, ровняешь его по клиенту и закидываешь всеми остальными кнопками.
Все :)



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

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

Наверх





Память: 0.47 MB
Время: 0.004 c
14-42864
Wonder
2001-12-25 11:36
2002.02.14
Merlin! Что же это такое началось?!


14-42861
fliz
2001-12-26 17:36
2002.02.14
Есть ли какие-то ключи(настройки),предписвыающие Дельфи6 компилить под Вин2000 ?


3-42658
Eraser
2002-01-21 10:04
2002.02.14
Скоко можно записей в DB


1-42805
Анатолий
2002-02-01 07:11
2002.02.14
SaveDialog


14-42855
Snake
2001-12-24 18:03
2002.02.14
Администрирование Win2000





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский