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

Вниз

Изменение вида кнопки   Найти похожие ветки 

 
Smile   (2002-01-01 20:51) [0]

Как изменить вид кнопки(например SpeedButton), сделать например ее круглой, ну а также за одно и форму?


 
Pat   (2002-01-02 16:45) [1]

В FAQ этого пруд пруди!!!!
>Smile
Сам искал и разобрался. Все подробно написано...
Специально для тебя кое-что все таки отыскал в своих запасах. Здесь все даже очень подробно написано и с примерами:
http://kubtts.kuban.ru/forum_new/forum2/arhiv/172.html
Если сможешь прочитать, то поймешь :-))
По поводу круглых кнопок. Круглая-то она у тебя будет, только вот на кнопку не очень похожа :-((. Объемность кнопки достигается тенью вокруг нее. А SetWindowRgn как бы "обрезает" по контуру региона. Если хочешь круглую и объемную, рисуй "ручками", посмотри как это делается в комонентах, если хочешь писать все сам...


 
Nikolay   (2002-01-02 18:15) [2]

procedure TForm1.FormCreate(Sender: TObject);
var
Rgn: HRGN;
begin
Rgn := CreateEllipticRgn(0, 0, Width, Height);
SetWindowRgn(Handle, Rgn, true);
end;


 
skaminski~~~~   (2002-01-02 23:42) [3]

Если нужно, напиши мне на мыло, вышлю парочку исходников своих компонент (кнопок).


 
Smile   (2002-01-03 08:12) [4]

да это конечно хорошо, вот только одна проблема: что-то я твоей анкетки найти не могу. я конечно может и слепая, ну уж что поделать. Может поможешь в поиске??? :-))


 
skaminski~~~   (2002-01-04 05:22) [5]

А уменя и нет никакой такой анкетки
просто щелкаем на моем нике и отправляем письмо ;)
но если уж очень нужно именно анкетка, то вот (сокращенный вариант):

Каминский Сергей Александрович
Программирование для земельного кадастра
Украина
skaminski@yandex.ru




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

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

Наверх




Память: 0.45 MB
Время: 0.004 c
1-66270
Andrey Sharapow
2001-12-30 10:53
2002.01.21
Build with runtime packages ???


7-66369
Ketmar
2001-10-05 08:55
2002.01.21
SEH без try/except


1-66275
well
2002-01-04 11:07
2002.01.21
TreeViev


1-66288
Scanner
2002-01-04 19:18
2002.01.21
Правила хорошего тона в использовании классов


4-66390
Asisyay
2001-11-19 18:24
2002.01.21
приоритет





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