Touch Screen : BUTTON, IMAGE and LABEL

[AUGE_OHR]

hi,

for Touch Screen in want to make some "Button"
i want COLOR which does not exist in BUTTON or IMAGE only LABEL have Color Option

but ONCLICK of LABEL need "DblClick" to work ... not good for Touch Screen

---

i try to the "Theme OFF" and ON PAINT but it seems not to work with BUTTON
what are i´m doing wrong ... need Idea

KACHEL.ZIP

(2.27 KiB) Downloaded 90 times

[mol]

Hi Jimmy!
I'm using LABELS for my touchscreen without any problems and modifications.

[AUGE_OHR]

hi Mol,

I'm using LABELS for my touchscreen without any problems and modifications.

you are right ... if Label have Focus.

in my Demo Sample 1st Touch is "SetFocus" and 2nd Touch is "the Click" ... hm
perhaps it have to do while i create it in a loop in Demo Sample ... any Idea welcome

[AUGE_OHR]

hi,

i have use Form Designer to create Code for LABEL

LABELDBL.ZIP

(995 Bytes) Downloaded 89 times

please try to "click" on LABEL
it need DblClick to get MsgInfo() ... what is going wrong ...

Mol is right that it should only "One Click" but this Demo does not work that Way, why

[AUGE_OHR]

hi,

OK found out that it run on HMG3.5 which have "Original" LIB
i must have "change" something ...

Code: Select all

            //  Label / HyperLink / Image Click .....................
// Original
   	     IF HiWord( wParam ) == STN_DBLCLK  .AND. ( _HMG_SYSDATA[ 1 ] [ i ] = "LABEL" .OR. _HMG_SYSDATA[ 1 ] [ i ] = "IMAGE" )
// Jimmy 24.11.2020
            *IF HiWord( wParam ) == STN_CLICKED .AND. ( _HMG_SYSDATA[ 1 ] [ i ] = "LABEL" .OR. _HMG_SYSDATA[ 1 ] [ i ] = "IMAGE" )

OK, sorry it is my own "BUG" from other Project

---

in that Project i want 1st. Click on LABEL "just" to setfocus to be able to "move" OR "edit" LABEL
so i have to find other Solution and use "Original" Code in HMG LIB

[mol]

Hi!
I was going to test it, but if you found problem, it's OK

[Claudio Ricardo]

Hi Jimmy
Perhaps using a variable "lFlag := .F."
and in Label OnClick Iif ( lFlag, GoToYourFunction (), lFlag := .T.) // or a codeblock
First click selects and second click calls the function (you have to add reset then the flag)

[mol]

If I undestand well, you want to use labels in two modes - one for normal work and second for design mode?

[andyglezl]

hi,

i have use Form Designer to create Code for LABEL
LABELDBL.ZIP

please try to "click" on LABEL
it need DblClick to get MsgInfo() ... what is going wrong ...

Mol is right that it should only "One Click" but this Demo does not work that Way, why

????
The demo works with one click...

imagen_2022-02-16_123311.png (16.66 KiB) Viewed 1187 times

[AUGE_OHR]

????
The demo works with one click...

sorry it was my fault while i had change it in Source of LIB for HMG

i have change it on 24.11.2020 "as Newbie" while i had the Source ...
now i know it was not a good Idea to change LIB to get a App run ...

p.s. but i have document it so i found it