cX.Farbe.HTML

cX.Farbe.HTML 18 Feb 2023 13:01 #1

daywalker
Autor
Offline
Platinum Boarder
Beiträge: 967
Dank erhalten: 664

Servus lieber Stefan.

In beigefügtem Skript versuche ich mit einem kleinen Programmfenster, das ich an eine bestimmte Position am Bildschirm mit der Maus hinbewege, dann irgendeine Taste
drücke und so einen Bildauschnitt aus dem darunterliegenden Desktop anzufertigen. Funktioniert. Nun hole ich mit einem Rechtsklick irgendeinen Pixelfarbwert aus diesem Teilausschnitt
und setze damit die Hintergrundfarbe des kleinen Bildelements in der linken oberen Ecke des Programmfensters. Und nun möchte ich mit einem Klick in das Bildelement den HTML
Farbwert der Hintergrundfarbe zur weiteren Verwendung in die Zwischenablage kopieren. Bis hierher alles super . Nur der Farbhexwert ist irgendwie verdreht. Siehe Bildschirmfoto.

wobei das in Zeile 26 funktionieren würde.
#[cX.Rechts(6;[cX.Hex([cX.Anzeige.Element(Bild-Element_1).Hintergrundfarbe])])]

 cX4Web Code

Was ist das?
1  *** Farbe unter Mauszeiger 

2  Anzeige-Fenster 'Pixelfarbe', ID='Anzeige-Fenster1', Breite=100, Höhe=60, Rahmen: einfach

3  Bild-Element  (ID='Bild-Element_1', X='0', Y='0', Breite='6,88', Höhe='5,82', Zielfenster='Anzeige-Fenster1', Anker: 5)

4  Warte Endlos (Warten auf zu behandelnde Ereignisse)

5  
6  *** Tastendruck liefert einen Bildausschnitt des Desktops.¶Mit den Lagekoordinaten des Programmfensters. 

7  :: Anzeige(Anzeige-Fenster1)_Taste

8  Setze , MultiSet 'x1=[cX.Anzeige(Anzeige-Fenster1).X]¶y1=[cX.Anzeige(Anzeige-Fenster1).Y]¶b1=[cX.Anzeige(Anzeige-Fenster1).Außenbreite]¶h1...'

9  Warte Pause, Dauer 200ms

10  Zeichne Bild, Text '%Desktop;[x1];[y1];[b1];[h1]%', Ziel 'Anzeige-Fenster1'

11  Setze , MultiSet 'cX.Anzeige(Anzeige-Fenster1).Sichtbar=1¶cX.Anzeige(Anzeige-Fenster1).Transparenz=0'

12  Beende Unterprogramm (Zurück)

13  
14  *** Transparenz=40 

15  :: Anzeige(Anzeige-Fenster1)_Bewegt

16  Setze , MultiSet '[cX.Anzeige(Anzeige-Fenster1).Transparenz]=40¶'

17  Beende Unterprogramm (Zurück)

18  
19  *** In diesem Unterprogramm kann man mit Mausklick rechts den Hex Farbwert unter dem Mauszeiger aus dem Desktopauschnitt im Programmfenster¶auslesen. Sodann wird dieser Wert als Hintergrundfarbe im Bildelement gesetzt. 

20  :: Anzeige(Anzeige-Fenster1)_Maustaste_unten(2)

...
cX4Web Code: Einfach anklicken zum Kopieren und in click.EXE 5.0 einfügen
			
**cx5AR-LC AAAAAAABAD FV_9u2zYQ_ n_A3uGgLYM DtIodbEWAR AXyE8kaFwH sJekCL6Cli 0WIIgWSguy 8zN6iL9AX2 1FSIsVJLa_ L0H9k0joev _v48e60Nwo 1z-z7H38A2 DvMhc01vo9 wb-thXL1Qa cpkZMpZM4f 6d7zIMPDcB KX1YIxzG3g nTE8RcmlRw 5Dl5h75DLU HWyudjGJVX HEZqcKDsyj w9mW57u0JS kOeBg_eL_g cxZ3bwoMrH tk48Ab9vge nZB3T-3c0P lA6Qj2yC0G Ot8lfqGTgb Xxglgk162U 8Q2txc6ML0 wWTKCo4B1x Eb48FukBvC cwF0zQ6UTp 9Gey5CpnlS l4HXr-ZfSp nNex3b3Z2G ty_vdkhpPs yjJWmGYWrl LA8q_gsUNt nlELKbTlNB A8T4BL-LLg JY5RsKtgMI VEZR8LpEyU sTA6VcL69O maK-kRJ23C wVQe_kpMrx m0Xb8dpZhd dRkuqGTNiT kY6p0gExzs XMHKJEhz1F CQFJrm1EKG BIzSJVZnxf _lpfrRLj_3 dIXevJJxT4 IkiAXDJyGF pfqHVTLM0v auOx_hd2H7 P02zIdOLBR 5bi4_n2ls9 587aE3altt JdMczoVMn0 Y0UGQFR2pt G44pGvHyTD w5oPgJrz2v 7qnfz1pwl5 0GX9qGU-7j PfzL3-jnGr kFlvr4vXWx V8-x-1lK5e MeBjbKdNBv 4u9SnHVmK7 ImKc4yhhd6 O1-PzVdq48 0K9qrS7Ft1 ALavZkPJrs 3C_eYukc8m Gy4C-ry0Nn RCxf7P92df 6eD9egbrMn 3WDNpMpe17 rspP5bR_3L HWxh-7QSx_ iU8wAJnnVn pCfsNzauV3 YI8IcwN2d- JwjPKaBwNp vCHqwZZndk gYVICrVqqC RpJJqZMjKc 4h6VSEpGbV jmhUflXfTl oWqdcni6n0 IYHshKER_o wUpEDUXAdV Rg1XLm9mDB wyt2GM53Lq KzdzqXL61h VVJiRub23r 5iYXVzWJed bF6vsbW9-o z78uur3nrY Am_5yTMHPq 6VU9kXrpsc xZWARgPNYr uu1na8NaUJ _jYfnk-8k1 lPqPkDmD5r IdRjXNf1J1 xIxA4lwL55 ogqcNV0vyI 5lqJ-hSy-X 4mb4qt4eCZ 1PFdNS4us8 1FK7A0Z2GS 9QFdR25nNX N0mtK8Cund PvBBf6NPQO J4DEm37HcK h5tsby6RIZ oDLVWrv5aB -RM3ql2x18 exc0zeBMoc mrGy_Pg-Nf w5RbVsb6i6 MJBbq2Shlr 9astLjkU5W VvWjwXafcr sbdUfP_8Ay hJKzAUNAAA ==*
  (28 Zeilen, cX 5.0.10.0, Lizenz: Pro)

lg Christian

Folgende Benutzer bedankten sich: Soko

Bitte Anmelden oder Registrieren um der Konversation beizutreten.

Letzte Änderung: von daywalker.

cX.Farbe.HTML 19 Feb 2023 13:13 #2

Stefan Offline Administrator Beiträge: 1230 Dank erhalten: 1757	Hallo, Christian! Ich habe dasd Gefühl, du verwechselst diese "HTML-Darstellung" einer Farbe mit der Hex-Darstellung! In HTML sind die RGB-Komponenten halt in einer anderen Reihenfolge... Liebe Grüße Stefan Folgende Benutzer bedankten sich: Soko
	Bitte Anmelden oder Registrieren um der Konversation beizutreten.

cX.Farbe.HTML 19 Feb 2023 14:35 #3

daywalker Autor Offline Platinum Boarder Beiträge: 967 Dank erhalten: 664	Hallo Stefan. Ja wird wohl so sein, das wusste ich nicht aber könnte man das ev. in der Doku vermerken? Die nachfolgende Zeile wie gesagt, arbeitet in dem Kontext so wie ich als Unwissender dies erwartete. #[cX.Rechts(6;[cX.Hex([cX.Anzeige.Element(Bild-Element_1).Hintergrundfarbe])])] Danke für Deine Mühe lg Christian Folgende Benutzer bedankten sich: Soko
	Bitte Anmelden oder Registrieren um der Konversation beizutreten.

cX.Farbe.HTML 16 Mai 2023 16:10 #4

Siebald
Offline
Beiträge: 89
Dank erhalten: 26

Hallo daywalker,
ich habe mir Dein Beispielscript angesehen. Die Bestimmung der Farbe funktioniert auch. Gibt es aber eine Möglichkeit die RGB-Farben ohne ein Kopieren des Bildschirminhaltes in ein Cx-Fenster zu bestimmen. Mir schwebt ein Programm vor, wo ich außerhalb eines Cx-Fensters die Farben des Bildschirmhintergrundes bestimmen kann und zwar dort, wo gerade die Maus geklickt wird.

Vielen Dank im Voraus.

Gruß Frank

Folgende Benutzer bedankten sich: Soko

Bitte Anmelden oder Registrieren um der Konversation beizutreten.

cX.Farbe.HTML 16 Mai 2023 18:04 #5

daywalker
Autor
Offline
Platinum Boarder
Beiträge: 967
Dank erhalten: 664

Servus lieber Frank!

Dies wäre ein Ansatz der funktioniert. Wenn Du die linke Maustaste drückst, wird die Fensterhintergrundfarbe so gesetzt wie das Pixel unter dem Mauszeiger.

 cX4Web Code

Was ist das?
1 *** Farbpixel unter Mauszeiger 

2 Anzeige-Fenster 'Infofenster', ID='Anzeige-Fenster1', Breite=151,61, Höhe=35,98, oben auf

3 Warte Endlos (Warten auf zu behandelnde Ereignisse)

4

5 :: System_Mausaktion (keine rekursiven Aufrufe)

6 Wenn (? '[cX.Bildschirm.MausTaste]=1'), ""

7 Setze , MultiSet 'cX.Anzeige(Anzeige-Fenster1).Hintergrundfarbe=$[cX.Bildschirm.Farbe([cX.Bildschirm.MausX];[cX.Bildschirm.MausY])]'

8 Ende Wenn

9 Beende Unterprogramm (Zurück)
cX4Web Code: Einfach anklicken zum Kopieren und in click.EXE 5.0 einfügen
			
**cx5AR-LC AAAAAAABAC NU99rwjAQf h_sfwhhDwp OKcOxsUbYx kQH7mGKOkY ZsbnaYJuUN EXdX7-Ltji crD7l7rvvf l_8cWhkZnu XF4T4z0ViC wM9AX6nkvc GnaZciXynH XRSvpNtBow 6BZSlZAIby 2ifm0UmN5C QQlkwZMSL_ BvkEgwlnX8 DjWO9nkkl9 JqSoWD0Ue3 8rvugcozkV RmGKtLRHqN kJoWNGfW6X usWGQP0iJF z023d36GDz kY6R92rSz7 j0tZxXtLMb utIr0Wajbh ZUfLGU9fVF gtNv9wY-Mp KrdCg3wEnZ rgK4YzSxpY bO4wookpIF 2KPe7-QKU8 KhD7DeftJJ iIPY2nStks 64Zg_YOX0M HDGzV9nKc4 pBOyUG8kXC VBSSYzuIll syIkjvB-JR EaxlHKDjeN NNtsD6Y5ja QolIjwYYFd HpbszgsaJf ubBwwn0I2g GtetTwk2xl lRR8DMc7t_ vlD_mB--Cf wo6AwAA=*
  (9 Zeilen, cX 5.0.10.2)

Funktioniert aber nur korrekt, wenn in der Systemeinstellung das gelb markierte mit 100% eingestellt ist.

lg Christian

Folgende Benutzer bedankten sich: Soko, Siebald

Bitte Anmelden oder Registrieren um der Konversation beizutreten.

Letzte Änderung: von daywalker.

cX.Farbe.HTML 17 Mai 2023 07:32 #6

Siebald Offline Beiträge: 89 Dank erhalten: 26	Hallo daywalker, vielen Dank für das Demo-Script. Es funktioniert erst einmal. Ich werde jetzt noch versuchen die RGB-Werte der Click-Position zu ermitteln. Gruß Frank
	Bitte Anmelden oder Registrieren um der Konversation beizutreten.

THEMA:

cX.Farbe.HTML 18 Feb 2023 13:01 #1

Anhänge:

cX.Farbe.HTML 19 Feb 2023 13:13 #2

cX.Farbe.HTML 19 Feb 2023 14:35 #3

cX.Farbe.HTML 16 Mai 2023 16:10 #4

cX.Farbe.HTML 16 Mai 2023 18:04 #5

Anhänge:

cX.Farbe.HTML 17 Mai 2023 07:32 #6

Community