| |
|
|
Bernd Kaiser | Hello Frank,
somewhere is in my code one Error, whom I do not find. The problem: once I The mouse from the List view-area move, scrolls the List view. i will a row with Double click select and then on the Button back weg. the functions too, only once I with the Cursor in direction Button weg scrolls it.
this is for the time being one Zwischenstand, if the everything yet something bereft of meaning looks. i will first thing The grundlegenden items ready to put and then The Detailarbeit make.
here time the code: CompileMarkSeparationShowListView(listview&,30,25,345,240) Anzeige des Listviews
InitMessages(%hwnd) Initiert das Subclassing für alle verwendeten Listviews im Fenster.
Erforderlich, um die Sortierung im Listview zu aktivieren
Auswertung der Mausklicks
Dim ItemTexts#,16384
Dim bereich#,bytes&
WhileNot appexit%
If @GetFocus(LiefAuswahlEnde%)
Let appexit%=1
ENDIF
y&=GetControlParas(bereich#)
If y&=2 rechte Maustaste gedrückt
text$="Auswahl des Lieferanten mit einem Doppelklick in die Zeile!"
EnableWindow LiefAuswahlEnde%,0
ElseIf y&=1 Doppelklick, nur damit soll es weitergehen
GetItemText(listview&,bereich#,1,2)
text$="ausgewählt: "+String$(bereich#,64)
SetText status&,text$
EnableWindow LiefAuswahlEnde%,1
columns&=GetLineText(listview&,2,itemtexts#)
ElseIf y&=3 linke Maustaste gedrückt
text$="Auswahl des Lieferanten mit einem Doppelklick in die Zeile!"
EnableWindow LiefAuswahlEnde%,0
EndIf
If y&<>0
SetText status&,text$
Endif
Wend
Auswertung der Mausklicks
CloseMessages(%hwnd) Deaktiviert das Subclassing für alle verwendeten Listviews im Fenster wieder.
freedll lvdll& Listview.dll entladen
Greeting Bernd |
|
|
| Win98SE, Profan 7.5 -------------------------------------------------- Programmieren ist wie küssen: Man kann darüber reden, man kann es beschreiben, aber man weiß erst, was es bedeutet, wenn man es getan hat. | 05/17/05 ▲ |
|
|
|
|
| Hehe what fürn chance - look time here goes it grade therefore:
[...]
salvo, iF. |
|
|
| |
|
|
|
ByteAttack | Sorry - my Error. Nächstes time I will whom Topictitle rather dial. though there too a Suchfunktion in this Forum. generally ought to one first in the Forum search, before one one new Topic starting. |
|
|
| |
|
|
|
Frank Abbing | |
|
| |
|
|
|
Bernd Kaiser | Hello Frank,
if I it correctly. understood have must I on V1.7 Waiting.
what I do not begreife, in the list view-pkg are a couple Examples, u.a. The Mini-Lagerverwaltung and there functions it. well well, one must not everything understand.
on The Suchfunktion I will prospective think.
Greeting Bernd |
|
|
| Win98SE, Profan 7.5 -------------------------------------------------- Programmieren ist wie küssen: Man kann darüber reden, man kann es beschreiben, aber man weiß erst, was es bedeutet, wenn man es getan hat. | 05/18/05 ▲ |
|
|
|
|
Frank Abbing | Hi,
klick here for neuste Betaaversion: [...]
The Error trod then on, if no WaitInput using watts and if the lowermost or supreme entry only semi visible was. In my Examples try I The Size so festzulegen, the any Texts well visible are. |
|
|
| |
|
|