xHarbour Reference Documentation > Function Reference

SetBlink()

Determines how to treat the asterisk in a SetColor() string.

Syntax

SetBlink( [<lOnOff>] ) --> lOldSetting

Arguments

<lOnOff>

This is a logical value. If .T. (true) is passed, the asterisk (*) in the background color of a SetColor() string causes the foreground color (text) to blink. If .F. (false) is passed, the background color is set to high intensity.

Return

The function returns the setting which is active before SetBlink() is called.

Description

SetBlink() is a compatibility function which toggles interpretation of the blink attribute (*) if it is specified for the backgroud color of a SetColor() string. The blink attribute is only relevant when an application runs in full screen text mode. In addition, its availability is operating system dependent.

If the blink attribute is not supported by the operating system, the asterisk (*) is treated like the high intensity color attribute (+).

Info

See also:	ColorSelect(), SetColor()
Category:	Screen functions
Source:	rtl\setcolor.c
LIB:	xhb.lib
DLL:	xhbdll.dll

Example

// The example displays text with the SetBlink() setting on and off.

   PROCEDURE Main
      CLS
      SetColor( "N/GR*" )

      @ 0, 0 CLEAR TO 2, MaxCol()
      ? "Blink attribute is:", SetBlink()

      WAIT "Press a key to toggle blink attribute"

      SetBlink( .NOT. SetBlink() )

      @ 0, 0 CLEAR TO 2, MaxCol()
      ? "Blink attribute is:", SetBlink()

      WAIT "Press a key to end"
   RETURN