| |
|
|
Jac de Lad | Oh, ich hatte mit der Unit experimentiert, bin aber im Moment noch zu sehr beschäftigt. Aber ich werds auf alle Fälle tun! Versprochen!!!
Jac |
|
|
| Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE) Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP | 18.09.2006 ▲ |
|
|
|
|
Jac de Lad | Öhhm, ist es vielleicht möglich, dass du eine kleine, eindeutige Hilfe schreibst? Trotz Source bin ich mit den Parametern überfordert. Gerade dort, wo mehrere Parameter-Konfigurationen möglich sind. |
|
|
| Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE) Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP | 20.09.2006 ▲ |
|
|
|
|
| Kla - also im Grunde sind nur 2 Parameter nötig, sei denn, es muß ein ProcAddr-Event sein denn dann sinds 3:
es ist immer: eventmerker&=on.event(EVENTNAMEoderNUMMER,CONTROL&[,PROCADDR(myProc,3)])
Normales Event schalten was sich per Umessage durchschleifen lässt:
onclose&=on.event(eventname oder nummer im string,controlumdasesgeht&)
um dann:
Case %Umessage==onclose& : Break
nicht-normales (sondern progaddr) Event schalten was sich nicht per umessage durchschleifen lassen würde:
event.size&:=on.event(eventname oder nummer im string,controlumdasesgeht&,procaddr(prozedurname,3))
egal aber welches Event - löschen ganz einfach mit:
on.delevent event.size&
oder einfach
on.delevents //löscht alle! |
|
|
| |
|
|
|
Jac de Lad | Ähhm, danke, ich fitz mich mal rein... |
|
|
| Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE) Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP | 20.09.2006 ▲ |
|
|
|
|
| Hm wieso fizeln? Das ist doch sowas von eine einfache Geschichte!!!
Ich sags ja - Source mitgeben ist nicht immer gut - das irritiert bloß! |
|
|
| |
|
|
|
Jac de Lad | Hallo iF!
Ich hab mich jetzt in die Unit reingewurschtelt und nach ein paar Programmabstürzen, die auch mich zurückzuführen sind, klappt alles wunderbar. Nur fehlen mir noch einige Messages: Was muss ich zum Beispiel angeben, um mein Listview auf Linksklicks reagieren zu lassen (das klappt bei mir immer nur einmal, dann passiert nichts mehr) und viel wichtiger: Was muss ich tun, damit das Listview mich informiert, wenn per Pfeiltasten ein anderes Element angewählt wurde? Ich hab zwar in paar Messages gefunden aber selbst mit Konstantinopel werde ich nicht schlau (BTW: Wähle mal per Menü ListviewLV an -> alles erscheint doppelt). Kannst du mir bitte helfen??? |
|
|
| Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE) Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP | 20.09.2006 ▲ |
|
|
|
|
| Zeigst Du mir mal das Event für den Linksklick auf das Listview? |
|
|
| |
|
|
|
Jac de Lad | |
|
| Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE) Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP | 21.09.2006 ▲ |
|
|
|
|
Jac de Lad | Eigentlich reicht ja schon so ne Art OnItemChange oder OnSelectionChange, da ist dann egal wie das gechanged wurde... |
|
|
| Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE) Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP | 21.09.2006 ▲ |
|
|
|
|
Jac de Lad | Wenn ich das für mein Listview defniere klappts genau einmal, aber nur wenn vorher kein anderes Event ausgelöst wurde (z.B. rklick)... KompilierenMarkierenSeparieren Bin ich zu blöde oder hat iF uns da einige Bugs untergeschoben...? |
|
|
| Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE) Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP | 21.09.2006 ▲ |
|
|
|
|
| Keine Bugs! Aber Du nutzt eine Syntax die ich nirgends im Beispiel verwende
ldklick ist leftDoubleKlick, LKlick ist leftklick
Linksklick auf Listview?
Wart...
Hier - ganz einfach! KompilierenMarkierenSeparieren {$Cleq}
$U On.pcu = On.
Def Getsyscolor(1) !"User32","GetSysColor"
Declare Lb&,Dlg&
//unsichtbares Hauptfenster damit lecker messages angekommen
Windowstyle 80 | 1024
Window 0,0 - 0,0
Showwindow(%Hwnd,0)
//
Windowstyle 512+8
Dlg&:=Createdialog(0,"MyDlg",100,100,640,480)
Lb& = Create("GridBox",Dlg&,"0;0;340;0;2;100",0,0,0,300,300)
declare onclose&,onlklick&
onclose&:=On.event("close" ,Dlg&)
onlklick&:=On.event("lklick" ,Lb&)
While 1
Waitinput
Case %Umessage==onclose& : Break
Case %Umessage==onlklick& : messagebox "","",0
Wend
On.close
End
|
|
|
| |
|
|
|
| Hast Du eigendlich manuell UserMessages in Deinem Programm vergeben? |
|
|
| |
|
|