Bom dia pessoal,
Estou iniciando com oracle forms e estou com um dúvida...
Fiz um formulário em forms e gostaria que a cor de fundo do campo alterasse sempre que o campo estiver selecionado.
ex: campo seleciona cor de fundo alterada...perdeu o foco volta a cor normal...
sei que é alguma coisa como SET_ITEM_PROPERTY(‘CAMPO’,VISUAL_PROPERTY, 'CAMPO VISUAL PROPERTIES');
Help....
Alterar o background do campo
-
- Rank: Analista Júnior
- Mensagens: 75
- Registrado em: Seg, 19 Mar 2012 2:28 pm
-
- Rank: Analista Júnior
- Mensagens: 75
- Registrado em: Seg, 19 Mar 2012 2:28 pm
Da uma força ai galera...
eu criei um item do visual attribute com a cor de fundo que quero e se chamo em um botão ele altera a cor de fundo do campo que me referencio.. preciso que seja alterado quando o campo obter o foco...
alguém sabe qual evento é esse?
eu criei um item do visual attribute com a cor de fundo que quero e se chamo em um botão ele altera a cor de fundo do campo que me referencio.. preciso que seja alterado quando o campo obter o foco...
alguém sabe qual evento é esse?
-
- Rank: Analista Pleno
- Mensagens: 110
- Registrado em: Ter, 24 Mai 2005 9:16 pm
- Localização: Dongguan - Guangdong - China
Deus criou os loucos para confundir os sábios
Eu fiz assim:
Criei o bloco abaixo:
Onde tenho dois visual atribute criados, um BRANCO e outro AZUL e chamo o código abaixo na trigger WHEN-NEW-ITEM-INSTANCE
Criei o bloco abaixo:
Onde tenho dois visual atribute criados, um BRANCO e outro AZUL e chamo o código abaixo na trigger WHEN-NEW-ITEM-INSTANCE
procedure set_block_color is
--
cur_itm varchar2(80) := :System.Cursor_item;
cur_block varchar2(80) := :System.Cursor_Block;
pitem varchar2(80);
--
begin
--
pitem := Get_Block_Property( cur_block, FIRST_ITEM );
--
while ( pitem is not null ) loop
--
pitem := cur_block||'.'||pitem;
--
if get_item_property( pitem, visible ) = 'TRUE' then
--
if get_item_property( pitem, item_type ) not in ( 'DISPLAY ITEM', 'BUTTON' ) then
Set_Item_Instance_Property( pitem, CURRENT_RECORD,VISUAL_ATTRIBUTE,'VISUAL_BRANCO');
end if;
--
end if;
pitem := Get_Item_Property( pitem, NEXTITEM );
end loop;
--
if get_item_property( cur_itm, item_type ) not in ( 'DISPLAY ITEM', 'BUTTON' ) then
--
Set_Item_Instance_Property( cur_itm, CURRENT_RECORD,VISUAL_ATTRIBUTE,'VISUAL_AZUL');
--
end if;
--
end;
-
- Informação
-
Quem está online
Usuários navegando neste fórum: Nenhum usuário registrado e 1 visitante