| |
|
|
ByteAttack | allô Community,
je voudrais volontiers den Mausklick dans einem ListView auswerten. Allerdings habe je encore autre Abfragen courir, sodas un WaitInput pour mon WhileNot Boucle pas dans Frage venez. je muss alles avec GetMessage faire. Beispiel:
cela funktioniert aussi Prima, doch malheureusement scrollt ensuite cela ListView avec meinem Mauszeiger toujours avec... cela geschieht avec WaitInput mais pas |
|
|
| |
|
|
|
Rolf Koch | Hi Marc-Gordon,
comment siehts aus, si Du qui Fil.pcu de Si benutzt?
Rolf |
|
|
| |
|
|
|
ByteAttack | malheureusement half cela aussi rien. Ist eh un merkwürdiges Verhalten des ListViews. Es scrollt zwar toujours hoch et runter, jenachdem wohin sich qui souris est, et si je un d'autre ListView anklicke, ou bien den Concentrer irgendwo anders mets, scrollt es munter plus ??? |
|
|
| |
|
|
|
ByteAttack | Nochmal je! Hat quelqu'un cette faute aussi bemerkt? si non, wird cela wohl à meinem Logitech Maustreiber sous XP liegen??? |
|
|
| |
|
|
|
Jörg Sellmeyer | allô Marc-Gordon, cela Phänomen kenn je. dans meinem ListViewGenerator taucht es aussi ab et à sur. Hab malheureusement encore aucun règle dabei trouvé. Salut Jörg |
|
|
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ... | 14.05.2005 ▲ |
|
|
|
|
| Poste doch la fois quelque chose Testbares - peut-être comme exe - so bekommt on toujours entier vite passende répondre.
Salve. |
|
|
| |
|
|
|
ByteAttack | |
|
| |
|
|
|
| Erhalte juste beim Start ne Exception.
Salve. |
|
|
| |
|
|
|
Rolf Koch | et chez mir wird cela la fenêtre ouvert et direct wieder geschlossen sans Hinweis o.ä.
et encore un Hinweis: Mir ist aufgefallen, im menu dessus sur Deiner le chasseur. Gibt es une neue Dll? là steht Includedateien Liestview.dll. Comme je le disais, seulement Hinweis. |
|
|
| |
|
|
|
ByteAttack | Alles NEW gemacht. un simple Testprogramm et Voir le texte source. si cela maintenant pas funktioniert, vais je dans den Ruhestand... KompilierenMarqueSéparation $P+
SetErrorLevel 0
USERMESSAGES 16,$0044
Declare prgexit%,lvdll&,ilist&,MerkeX%,MerkeY%,X%,Y%,listview&,bereich#,icons#,bytes&,x&,y&,text$
Dim bereich#,200000
Dim icons#,40000
Def GetSystemMetrics(1) !"USER32","GetSystemMetrics"
DEF MoveWindow(6) ! "USER32","MoveWindow","%%%%%%","%"
Def GetSysColor(1) !"USER32","GetSysColor"
$I ListView_Funktionen.inc
lvdll&=usedll("Listview.dll")
ilist&=CreateImageList(1,0)
Proc Update
Declare innenX%,innenY%,left%,viertel%,YBereich%
innenX%=(%WinRight-%WinLeft)-(GetSystemMetrics(33)+GetSystemMetrics(33))
innenY%=(%WinBottom-%WinTop)-(GetSystemMetrics(4)+GetSystemMetrics(33)+GetSystemMetrics(33))
MerkeX%=%WinRight-%WinLeft
MerkeY%=%WinBottom-%WinTop
if MerkeX%<640
SetWindowPos %hwnd=%WinLeft,%WinTop-640,MerkeY%;0
elseif MerkeY%<480
SetWindowPos %hwnd=%WinLeft,%WinTop-MerkeX%,480;0
endif
MoveWindow(listview&,5,5,innenX%-10,innenY%-20,59,1)
EndProc
Hauptfenster
SetTrueColor 1
WindowStyle 31
WindowTitle "ListView Test"
Window %maxX/2-320,(%maxY/2-240)-640,480
CLS GetSysColor(15)
listview&=CreateListView(%hwnd,%hinstance,0,$00FFFFFF,-1,$30)
SetImageList(listview&,ilist&)
text$="C:"
bytes&=FilelistToCsv(addr(text$),bereich#,0,0,31,icons#)
x&=SetColumnsFromMem(listview&,bereich#,addr(y&))
CsvToListview(listview&,(bereich#+y&),(bytes&-y&),x&)
x&=GetLines(listview&)
SetIconsFromMem(listview&,0,icons#,x&)
Dispose icons#
Dispose bereich#
AutoSortListview listview&,1,2,1,2,1
SetColumnWidth(listview&,0,-1)
SetColumnWidth(listview&,1,-1)
SetColumnWidth(listview&,2,-1)
SetColumnWidth(listview&,3,-1)
SetColumnWidth(listview&,4,-2)
SortManual(listview&,0,0)
ShowListView(listview&,5,5,780,550)
InitMessages(%hwnd)
MerkeX%=%WinRight-%WinLeft
MerkeY%=%WinBottom-%WinTop
Update
Declare handle&
Dim bereich#,320
WhileNot prgexit%
GetMessage
Case %Umessage=16:prgexit%=1
X%=%WinRight-%WinLeft
Y%=%WinBottom-%WinTop
CaseNot X%=MerkeX%:Update
CaseNot Y%=MerkeY%:Update
Clear bereich#
y&=GetControlParas(bereich#)
If y&<>0
handle&=Long(bereich#,0) Listview Handle
text$=String$(bereich#,64) Itemtext
WindowTitle text$
EndIf
Wend
Dispose bereich#
CloseMessages(%hwnd)
Dispose clv1#
Dispose clv2#
Dispose clvall#
Dispose tem#
freedll lvdll&
|
|
|
| |
|
|
|
GDL | allô Marc
WinME stürzt kommplett ab.seulement sur Reset wieder trop finissons.
salut Georg |
|
|
| |
|
|
|
| chez mir scrollt qui LV aussi faux. Dein Beispiel funzt - es liegt pas am Maustreiber - plutôt daran cela qui messages pas zurückgesetzt volonté. là wiederrum devrait Frank la fois regarder comment il ca avec dem XProfan-Getmessage convenir peux.
Wofür brauchst cela Getmessage überhaupt so dringend - statt dem Waitinput ?
Salve. |
|
|
| |
|
|