Announcement

Collapse
No announcement yet.

Image clipping on uLCD-32PT 4DGL

Collapse
X
 
  • Filter
  • Time
  • Show
Clear All
new posts

  • #16


    #platform "uLCD-32PT_GFX2"
    #constant LEFT 30#constant TOP 150#constant TEXTWIDTH 2#constant TEXTHEIGHT 2
    #inherit "4DGL_16bitColours.fnc"#inherit "FONT4.fnt"

    #MODE RUNFLASH
    func buton ()
    //gfx_Cls();
    touch_Set(TOUCH_ENABLE);

    gfx_Button(UP, 40, 10, BLUE, RED, FONT4, 3, 3, " >> ");
    touch_DetectRegion(40, 10, gfx_Get(RIGHT_POS),gfx_Get(BOTTOM_POS));
    while(touch_Get(TOUCH_STATUS) != TOUCH_PRESSED);
    gfx_Button(DOWN, 40, 10, RED, WHITE, FONT4, 3, 3, " >> ");while(touch_Get(TOUCH_STATUS) != TOUCH_RELEASED);


    endfunc


    func buton2()//x_Cls();
    touch_Set(TOUCH_ENABLE);

    gfx_Button(UP, 40, 250, BLUE, RED, FONT4, 3, 3, " >> ");
    touch_DetectRegion(40, 250, gfx_Get(RIGHT_POS),gfx_Get(BOTTOM_POS));
    while(touch_Get(TOUCH_STATUS) != TOUCH_PRESSED);
    gfx_Button(DOWN, 40, 250, RED, WHITE, FONT4, 3, 3, " >> ");while(touch_Get(TOUCH_STATUS) != TOUCH_RELEASED);
    -span" size="1">endfunc

    func main()buton();buton2();
    txt_FontID(FONT1);txt_Set(TEXT_OPACITY, OPAQUE);txt_Set(TEXT_WIDTH,2);txt_Set(TEXT_HEIGHT,2);txt_MoveCursor(10,1);



    putstr("OZTAS ");pause(500);




    endfunc

    [hr]thank you for help
    I tryed some code for cafe menu but when push the button other one is push all the time and it's passive button. also I want to make when push the button change food pictures or some words and send seri port same time

    Comment


    • #17


      http://hotfile.com/dl/110691394/b6bb6ee/menu_example.png.html

      Comment

      Working...
      X