Diff of /trunk/Library/Libname/Function Blocks/VisuFbMaterialSwitch/IVisualElement/HandleInput/svnobj [000000] .. [r2]  Maximize  Restore

Switch to unified view

a b/trunk/Library/Libname/Function Blocks/VisuFbMaterialSwitch/IVisualElement/HandleInput/svnobj
1
Gx_l!0…jüoœ
2
'p·DÉfXX¾System.StringL{f8a58466-d7f6-439f-bbb8-d4600e41d099}ImplementationL{3b83b776-fb25-43b8-99f2-3c507c9143fc}TextDocumentL{f3878285-8e4f-490b-bb1b-9acbb7eb04db}TextLinesL{a5de0b0b-1cb5-4913-ac21-9d70293ec00d}  Id
3
longTagText
¨IF NOT EffectiveState.bInvisible AND_THEN NOT EffectiveState.bInputDeactivated THEN ^    // determine the current position of the mouse^ mousePos := Visu_GetPointIfMouseEvent(pEvent);°    mousePos := m_pCurrentClientData^.GlobalData.DrawingContext.UntransformPoint(mousePos);z   Visu_FctGetPaintRectangle(m_StaticPosition, ADR(paintRect));V IF pEvent^.EventTag = VISU_ET_MOUSEUP THEN\    IF NOT EffectiveState.bInputDeactivated THEN°          IF VisuFctPointIntersectsPaintRectangle(pt := mousePos, pRect := ADR(paintRect)) THEN8            IF m_pValue <> NULL THENd             m_pValue^.SetValue(NOT m_pValue^.GetValue());2               HandleInput := TRUE;          END_IF       END_IF    END_IF` ELSIF pEvent^.EventTag = VISU_ET_MOUSEMOVE THEN®     IF VisuFctPointIntersectsPaintRectangle(pt := mousePos, pRect := ADR(paintRect)) THEN"         Hover := TRUE;.       HandleInput := TRUE;    ELSE         IF Hover THEN!&            Hover := FALSE;"0            HandleInput := TRUE;# END_IF      $END_IF%&Interface'L{a9ed5b7e-75c5-4651-af16-d2c27e98cb94}(2METHOD HandleInput : BOOL)VAR_INPUT*N   pEvent :         POINTER TO VisuStructEvent;+END_VAR,VAR_OUTPUT-VAR.L paintRect : VisuStructPaintRectangle;/:   mousePos : VisuStructPoint; ÐÐÐEÐÐ  
4
­0ÚÐ-
ÐÐ  
5
­7ÚÐ-ÐÐ  
6
­8ÚÐ-ÐÐ  
7
­9ÚÐ-ÐÐ  
8
­6ÚÐ-ÐÐ  
9
­ ÚÐ-ÐÐ  
10
­!ÚÐ-ÐÐ  
11
­"ÚÐ-ÐÐ  
12
­#ÚÐ-ÐÐ  
13
­2ÚÐ-ÐÐ  
14
­3ÚÐ-ÐÐ  
15
­%ÚÐ-ÐÐ  
16
­&ÚÐ-ÐÐ  
17
­'ÚÐ-ÐÐ  
18
­(ÚÐ-ÐÐ  
19
­)ÚÐ-ÐÐ  
20
­*ÚÐ-ÐÐ  
21
­4ÚÐ-ÐÐ  
22
­+ÚÐ-ÐÐ  
23
­:ÚÐ- ÐÐ  
24
­,ÚÐ-!ÐÐ  
25
­;ÚÐ-"ÐÐ  
26
­<ÚÐ-ÐÐ  
27
­-ÚÐ-ÐÐ  
28
­.ÚÐ-#ÐÐ  
29
­1ÚÐ-$ÐÐ  
30
­/ÚÐ-%ÐÐ  
31
­ÚÐ-%Ð&'ÐEÐÐ    
32
­ÚÐ-(ÐÐ  
33
­ÚÐ-)ÐÐ  
34
­ÚÐ-*ÐÐ  
35
­ÚÐ-+ÐÐ  
36
­ÚÐ-,ÐÐ  
37
­ÚÐ-+ÐÐ  
38
­ÚÐ--ÐÐ  
39
­ÚÐ-.ÐÐ  
40
­ÚÐ-/ÐÐ  
41
­ÚÐ-+ÐÐ  
42
­ÚÐ-%