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

Вниз

Разные картинки на Кнопке   Найти похожие ветки 

 
Maxwood ©   (2009-04-03 00:58) [0]

Есть КНОПКА, На ней картинка (Glyph), При нажатии на КНОПКУ открывается окно С радиал Груп (каждой кнопки своя картинка).
Нужно сделать так, чтоб при выборе определенной кнопки из радиал груп, На основной КНОПКЕ менялась картинка (Glyph).
Как это сделать?


 
Германн ©   (2009-04-03 01:01) [1]


> радиал Груп

А это что за зверь?


 
Maxwood ©   (2009-04-03 01:06) [2]

RadioGroup


 
Maxwood ©   (2009-04-03 01:08) [3]

Или подскажите как менять Glyph в зависимости от Выбора RadioButton


 
Германн ©   (2009-04-03 01:11) [4]


> Maxwood ©   (03.04.09 01:06) [2]
>
> RadioGroup
>

А разве в компоненте ТRadioGroup есть картинки у каждой кнопки?
В RADStudio 2007 не нашёл такого.


 
Германн ©   (2009-04-03 01:12) [5]


> Maxwood ©   (03.04.09 01:08) [3]
>
> Или подскажите как менять Glyph в зависимости от Выбора
> RadioButton
>

Вот переместят ветку в "Начинающие", тогда подскажем.


 
Maxwood ©   (2009-04-03 01:39) [6]

procedure TForm2.RadioButton1Click(Sender: TObject);
var RadioButton2 :TRadioButton ;

begin
if RadioButton2.Checked Then
BitBtn1.Glyph.LoadFromFile("C:\2.bmp");
end;

Это во второй форме. Не работает в первой-выдаёт ошибку


 
Maxwood ©   (2009-04-03 01:41) [7]

Вторая форма вытекает из первой, или я что-то делаю не так?


 
Putnik ©   (2009-04-03 01:41) [8]

Может как-то так:
Form1.BitBtn1.Glyph.LoadFromFile("C:\2.bmp");

А какую ошибку выдает?


 
DVM ©   (2009-04-03 01:42) [9]


> BitBtn1.Glyph.LoadFromFile("C:\2.bmp");


> Не работает в первой-выдаёт ошибку

А так:

uses Unit1;

procedure TForm2.RadioButton1Click(Sender: TObject);
var RadioButton2 :TRadioButton ;

begin
if RadioButton2.Checked Then
Form1.BitBtn1.Glyph.LoadFromFile("C:\2.bmp");
end;


 
DVM ©   (2009-04-03 01:43) [10]


> А какую ошибку выдает?

UNDECLARED IDENTIFIER ОЧЕВИДНО


 
Германн ©   (2009-04-03 01:51) [11]


> Maxwood ©   (03.04.09 01:41) [7]
>
> Вторая форма вытекает из первой

Вообще-то формы обычно не текут. :(

Ну где же эти "#$%^банные" пчёлы?! :)
Ну кто-нибудь из модераторов переместите сей топик в "Начинающие".
!


 
DVM ©   (2009-04-03 01:56) [12]


> Германн ©   (03.04.09 01:51) [11]


> Ну кто-нибудь из модераторов переместите сей топик в "Начинающие".

Он и так в "Начинающих" :)


 
Maxwood ©   (2009-04-03 01:59) [13]

Я конечно извиняюсь за безграмотность. У меня две формы На первой кнопка, при её нажатии открывается другое окно (форма2); как построить алгоритм, чтобы он выполнялся из формы2 в форме 1. Надеюсь ясно изожился.


 
Германн ©   (2009-04-03 02:09) [14]


> DVM ©   (03.04.09 01:56) [12]
>
>
> > Германн ©   (03.04.09 01:51) [11]
>
>
> > Ну кто-нибудь из модераторов переместите сей топик в "Начинающие".
>
>
> Он и так в "Начинающих" :)
>

Ну наконец-то. :)


 
Германн ©   (2009-04-03 02:16) [15]


> Maxwood ©   (03.04.09 01:59) [13]
>
> Я конечно извиняюсь за безграмотность. У меня две формы
> На первой кнопка, при её нажатии открывается другое окно
> (форма2); как построить алгоритм, чтобы он выполнялся из
> формы2 в форме 1. Надеюсь ясно изожился.
>

Тогда достаточно в первой форме сделать case  по значению RadioGroup1.ItemIndex.
P.S.
Надеюсь с основами Паскаля ты знаком. И знаешь для чего используется волшебное слово uses.


 
Maxwood ©   (2009-04-03 02:28) [16]

По-мойму работает. Завтра доделаю. Сил больше нет!


 
Maxwood ©   (2009-04-03 19:50) [17]

При выборе Кнопки без картинки, картинка остается предыдушая, как очистить кнопку?



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

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

Наверх




Память: 0.48 MB
Время: 0.005 c
2-1238564521
DDR2
2009-04-01 09:42
2009.05.17
Как узнать, что windows завершает работу?


15-1236175012
Arkady
2009-03-04 16:56
2009.05.17
В Delphi 2009 самопроизвольно меняется раскладка


3-1220966118
Demo_nik
2008-09-09 17:15
2009.05.17
Определение координат ячейки


15-1237093319
Mozart
2009-03-15 08:01
2009.05.17
1C - экспорт?


15-1237229765
Кто б сомневался
2009-03-16 21:56
2009.05.17
www.google.com





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