Re: Colored fields on the form

From: Haakon T. Soenderland <hts_at_sasdata.no>
Date: 1995/06/28
Message-ID: <3srf2l$a07_at_news.dax.net>#1/1


In article <3sr3hc$iom_at_cs3.brookes.ac.uk>, p0070621_at_brookes.ac.uk says...
>
>In article <3sp2dv$6u2_at_hammer.msfc.nasa.gov>, Robert Goodwin says...
>>If I'm not mistaken, altering the field attributes will change the field
>>colors for the entire column in a multirow block. As I understand it, you
>>want to change the color of a single field on a single row, depending on the
>>value. To my knowledge, there's no way to do this. Please post if you do
>>find a way.
>
>It is possible under forms 3.0. I don't know about forms 4. As others have
>mentioned, use
>DISPLAY_FIELD('block.field', BOLD);
>or whatever other attributes are defined in the resource file.

This procedure should do what you want, this takes a defined visual attribute as its argument:


  • Mark selected record.
    PROCEDURE MarkRecord(attrib VARCHAR2) IS item_name VARCHAR2(20); cur_item VARCHAR2(30); BEGIN
    • Color all items in the current row. item_name := Get_Block_Property(:system.trigger_block, FIRST_ITEM); WHILE item_name IS NOT NULL LOOP cur_item := :system.trigger_block || '.' || item_name; Display_Item(cur_item, attrib); item_name := Get_Item_Property(cur_item, NEXTITEM); END LOOP; END;
Hope this helps,
Haakon
-- 
hts_at_sasdata.no | haakon.soenderland_at_thcave.bbs.no | Haakon T. Soenderland
Scandinavian Airlines Data Norway A/S  
---
"40 skiver og et herpa anlegg, en leilighet som trenger aa spyles. Ingen 
 venner og ingen penger, alt jeg har er mine klamme hender.." Jokke '94
Received on Wed Jun 28 1995 - 00:00:00 CEST

Original text of this message