brwsetzeilenfarbe.i 301 B

1234567891011
  1. DO WITH FRAME {&FRAME-NAME}:
  2. FOR EACH tBrowser WHERE VALID-HANDLE(tBrowser.hCol)
  3. AND tBrowser.fVisible NO-LOCK:
  4. tBrowser.hCol:BGCOLOR = ipFarbe.
  5. IF ipFarbe = 12 THEN tBrowser.hCol:FGCOLOR = 15.
  6. END.
  7. END.
  8. RETURN TRUE.