Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

как окрасить компанент Panel? [D7, XP]


Fynjy ©   (2008-09-12 13:34:00) 

Привет! как окрасить компанент Panel? Нужно что-то типа -
при нажатии кнопки, окрасить панель в красный.
Я делал так:Panel1.Color:=clRed;, но не прокатило.


brother   (2008-09-15 04:06:00) [1]

> begin
>                   Close;
>                   Panel1.Caption:='что-то';
>                   Panel2.Caption:='что-то';
>                   Panel3.Color:=clRed;
>                   Panel3.Caption:='что-то';
>                   Panel4.Caption:='что-то';
>          end;

это зачем??? выбрось)))


MsGuns   (2008-09-12 16:33:00) [2]

Чуваки, вы не вперлись - все фишка в том, что у него скрывается под этим "что-то"


{RASkov}   (2008-09-12 15:56:00) [3]

> [14] KilkennyCat ©   (12.09.08 14:51)

При манифесте панель не красится, а код вполне можно сделать нормальным, например:
with DataSet do begin
                  Close;
                  Panel1.Caption:='что-то';
                  Panel2.Caption:='что-то';
                  Panel3.Color:=clRed;
                  Panel3.Caption:='что-то';
                  Panel4.Caption:='что-то';
         end;

:о)


Anatoly Podgoretsky   (2008-09-12 14:53:00) [4]

> KilkennyCat  (12.09.2008 13:46:04)  [4]

А у него красный.


KilkennyCat   (2008-09-12 14:51:00) [5]


> {RASkov}

при чем здесь манифест, ты на код глянь.


{RASkov}   (2008-09-12 14:09:00) [6]

> [12] Fynjy   (12.09.08 13:59)

В uses'ах ищи модуль XPMan, а на форме - компонент XPManifest1.... Удали их, но лишишся закругленых углов и красости ХР, зато твоя панель будет красной :)


Fynjy   (2008-09-12 13:59:00) [7]

что за манифест и что з а строка 17, где её искать?


{RASkov}   (2008-09-12 13:56:00) [8]

> [0] Fynjy   (12.09.08 13:34)

Манифест отключи


Fynjy   (2008-09-12 13:55:00) [9]

да это от IBQuery  остатки


Ega23   (2008-09-12 13:52:00) [10]


> что это значит?


Ошибка там у тебя. В строке с номером 17. Application.Run, судя по легенде.


Ega23   (2008-09-12 13:51:00) [11]


>  Close;


:))))))))))))


Fynjy   (2008-09-12 13:50:00) [12]


> что не так в 17 строке

что это значит?


Fynjy   (2008-09-12 13:48:00) [13]

вот процедура:
begin
                   Close;
                   Panel1.Caption:='что-то';
                   Panel2.Caption:='что-то';
                   Panel3.Color:=clRed;
                   Panel3.Caption:='что-то';
                   Panel4.Caption:='что-то';
          end;

сдесь не катит


Palladin   (2008-09-12 13:46:00) [14]


> Fynjy   (12.09.08 13:41) [2]

что не так в 17 строке


KilkennyCat   (2008-09-12 13:46:00) [15]

и у меня прокатило. но я выбрал зеленый цвет.


Ega23   (2008-09-12 13:45:00) [16]


> А что может быть не так?


Да нормально все. Рисует.


Fynjy   (2008-09-12 13:41:00) [17]

А что может быть не так?


Palladin   (2008-09-12 13:36:00) [18]

а у меня прокатило


Наверх

Титульная страница Поиск, карта сайта Написать письмо