2 Visual Components Manuals

3.3.8.14.2 Example for Automation Basic
(* cyclic program *)
color = 0 ; Black
if ready 1 then
VC_HANDLE = VA_Setup(1 "vga") ,
VC_HANDLE if 0 then
ready = 1
endif
endif
if ready = 1 then
if VA_Saccess(1,VC_HANDLE)= 0 then
color = VA_GetPaletteColor(1,VC_HANDLE,0)
VA_Srelease(1,VC_HANDLE)
endif
endif
3.3.8.14.3 Example for C Programming
#include
#include
#include
UINT _GLOBAL ready;
UINT _GLOBAL fill;
UDINT _GLOBAL color;
unsigned long VC_HANDLE;
_CYCLIC void Cyclic(void)
{
color /* = Black 0; */
if (!ready)
{
VC_HANDLE = VA_Setup(1 "vga"); ,
if (VC_HANDLE)
ready = 1;
}
if (ready)
{
if (!VA_Saccess(1,VC_HANDLE))
{
color = VA_GetPaletteColor(1,VC_HANDLE,0);
VA_Srelease(1,VC_HANDLE);
}
}
}
3.3.8.15 Graphics and Text Output − VA_GetTextByTextGroup
An individual line can be read from text groups with the VA_GetTextByTextGroup command.
3.3.8.15.1 Parameter
I/O Parameter Type Meaning
IN enable BOOL This function is only executed if enable is TRUE.
IN VCHandle UDINT The handle returned by VA_Setup.
IN TG_id USINT ID number of the text group to be read.
IN TGT_id USINT ID number of the line to be read in the text group.
IN pcText UDINT Text which is read (STRING)
IN pcTextlength UDINT Length of the STRING to be read
OUT Return Value UINT Not equal to 0 if error occurs
Introduction to Visual Components 2.3
150 3.3.8.14 Querying the Palette Color − VA_GetPaletteColor