| |
| |
|
| - Page 1 - |
|
Jörg
Sellmeyer | Hello Frank,
In Your example Alle_Maustasten_abfangen.prf using You SetTimer 10 around the Listviewvariablen To fill. is the The only Possibility The Mausklicks on The Spaltenbuttons sure To nab?
without goes it namely not 
I Have yourself too plenty rumprobiert but usually becomes the second same Click on a Column Button in the equal Control not any more registered.
If in between into List view clicked becomes GEHTS again.
I hope, I could me to some extent verständlich make 
alas Yes - it's about The left Mouse button!
The Simplicity halber same time code moreover.
Greeting
Jörg
CompileMarkSeparation $I Listview_Funktionen.inc
Declare LVDllHdl&
Declare bereich#,status&
Declare text$,x&,y&
Dim bereich#,320
LVDllHdl&=UseDll(Listview.dll)
Declare ListView1&
Proc SetListView1
InitMessages(%hwnd)
Declare tmptxt$
tmptxt$=Spalte 1;Spalte 2;Spalte 3
IColumn(ListView1&,Addr(tmptxt$),60,0)
tmptxt$=Spalte 2
IColumn(ListView1&,Addr(tmptxt$),60,0)
tmptxt$=Spalte 3
IColumn(ListView1&,Addr(tmptxt$),60,0)
WhileLoop 0,6
AddString(ListView1&,MkStr$(Test + Format$(00,&Loop) + |,3))
Wend
ShowListView(ListView1&,1,1,Width(%hwnd) - 2,Height(%hwnd) - 200)
EndProc
Proc ExitLV
CloseMessages(%hwnd)
FreeDll LVDllHdl&
EndProc
UserMessages 16
WindowStyle $218
Window 100,100 - 620,520
ListView1&=CreateListView(%hwnd,%hinstance,0,14417146,-1,$21)
SetListView1
status&=Create(TEXT,%HWND,text$,8,364,600,72)
While 1
WaitInput
Case %umessage = 16:Break
y&=GetControlParas(bereich#)
If y&=2
text$=Der rechte Mausknopf wurde in Spalte +Str$(Long(bereich#,4))+ / +Str$(Long(bereich#,8))+ gedrückt.
ElseIf y&=1
text$=Der linke Mausknopf wurde in Spalte +Str$(Long(bereich#,4))+ / +Str$(Long(bereich#,8))+ als Doppelklick gedrückt.
ElseIf y&=3
text$=Der linke Mausknopf wurde in Spalte +Str$(Long(bereich#,4))+ / +Str$(Long(bereich#,8))+ gedrückt.
EndIf
If y&<>0
text$=text$+Dieses ereignete sich im Listview mit dem Handle +Str$(Long(bereich#,0))+.
SetText status&,text$
Endif
x&=GetVar(2)
If x&<>-1
y&=GetVar(3)
text$=Der rechte Mausknopf wurde über dem Spaltenbutton in Spalte +Str$(x&)+ gedrückt.
text$=text$+Dieses ereignete sich im Listview mit dem Handle +Str$(y&)+.
SetText status&,text$
EndIf
x&=GetVar(4)
If x&<>-1
y&=GetVar(5)
text$=Der linke Mausknopf wurde über dem Spaltenbutton in Spalte +Str$(x&)+ gedrückt.
text$=text$+Dieses ereignete sich im Listview mit dem Handle +Str$(y&)+.
SetText status&,text$
EndIf
Wend
ExitLV
|
|
| |
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ...  | 03/10/07 ▲ |
|
| |
|
|
| |
| |
| - Page 1 - |
|
Jörg
Sellmeyer | this is already clear but now have You for normalen Klicks in the list view GetControlParas and Headerklicks GetVar and (only for left) User Messages.
If you The User Messages too yet for others Klicks einbaust is the request plainer. means z. B.:
$1401 = Header Link
$1402 = Header right
$1403 = normal Linksklick
$1404 = normal Rechtsklick
$1405= Double click
|
|
| |
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ... | 03/10/07 ▲ |
|
| |
|
|
Frank
Abbing | I have Yes nothing degegen. the nights Update comes certainly  . |
|
| |
| |
| |
|
|
Jörg
Sellmeyer | Frank Abbing
I have Yes nothing degegen. the nights Update comes certainly .
the wished I listen! |
|
| |
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ... | 03/10/07 ▲ |
|
| |
|
|
Frank
Abbing |
you have your profit ausprobiert, stimmts? I hörs me straight on - is Real to that piepen!
hold! The Sprachausgabe entstammt not my profit. so begot Language hears itself namely terrible on (only SAPI) and the Tool is long ago again deinstalliert.
Have me Voice Reader of linguatec order, the hears itself circa Lengths rather on...
the anyway is my opinion. |
|
| |
| |
| |
|
|
| @Hi Frank
the anyway is my opinion.
...my too ! |
|
| |
| |
| |
|
| |
| |
| - Page 2 - |
|
|
Frank
Abbing |
$1403 = normal Linksklick
$1404 = normal Rechtsklick
$1405= Double click
trouble: three Info go here needed: listviewhandle, spaltenindex, zeilenindex.
Per Message can I but only two versenden (lparam and wparam)... |
|
| |
| |
| |
|
|
Jörg
Sellmeyer | whom Zeilenindex You can then Yes again normalen Profanmitteln or List view.dll-Mitteln inquire.
CompileMarkSeparation |
|
| |
|
|
Frank
Abbing | | Have it so resolved, that slot and row transfer becomes. Through GetVar(7) can list view-lever determined go, if necessary. |
|
| |
| |
| |
|
|
Jörg
Sellmeyer | Poste still time an example.
I would find it rather, if the lever transfer becomes. then can a GetFocus similar function define, around the Events inquire.
CompileMarkSeparation |
|
| |
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ... | 03/11/07 ▲ |
|
| |
|
|
Frank
Abbing | |
| |
| |
| |
|
|
Jörg
Sellmeyer | OK, with the additional Flag with GetVar() goes it too so.
I würds then so make:
CompileMarkSeparation
with of my supra beschriebenen method needed one but the Flag 7 none. For this need one with your method GetControlParas not any more absolutely... |
|
| |
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ... | 03/11/07 ▲ |
|
| |
|
|
Frank
Abbing |
For this need one with your method GetControlParas not any more absolutely...
none, würd I say...
How mans turn and contact is Yes alike. |
|
| |
| |
| |
|
(525)
[/offtopic]
Deutsch
English
Français
Español
Italia