Listview-Markierte Zeile nach oben scrollen

[JörgG]

Hallo zusammen, mein Prog hat sich prächtig entwickelt. (Dank eurer Hilfe)
Mit der selectLine- Funktion von Frank kann ich ja mein Suchergebnis in den sichtbaren bereich scrollen. Nun ist so, das die Markierung sehr oft kurz über den unteren Rand des sichtbaren Bereichs klebt. Da ich aber schon während der Eingabe die Suche starte, iwäre es besser, wenn die markierte Zeile am oberen Rand klebt, so daß ich dann sehr schnell sehen kann, welche Namen,Vornamen (alphabetisch sortiert) im Anschluss des momentanen Suchergebnisses stehen, um ggf. die Sucheingabe mit esc zu verlassen & mit den Pfeiltasten zb. zwei Zeilen tiefer den gesuchten Namen zu markieren bzw. auszuwählen. In Frank's reichhaltigen Funktionsangebot habe ich nichts in dieser Richtung gefunden... Gibt es da vllt noch ein Funktiönchen, mit der ich das iwie hinwerkeln kann?
Gruß Jörg

[Frabbing]

Der Trick ist: Vor dem SelectLine ein weiteres SelectLine einbauen, womit du ganz nach unten in die Liste springst. Wenn dann dein eigentliches SelectLine kommt, hast du den Eintrag schönen oben "kleben". Das wurde von MS bischen blöd geregelt und ein Flag oder einen Style für das Sprungverhalten gibt es wohl nicht.

[JörgG]

alles Klar! probier ich gleich, hoffentlich "zappelt" dadurch das Listview nicht zu arg, weil die Aktualisierung ja nach jedem getippten Buchstaben ausgeführt wird.
Vielen Dank für den Tip
Gruß Jörg

[JörgG]

Hi Frank, klappt super! ich habe den ersten select nur ein kleines Stückchen tiefer gesetzt, also TrefferIndex + 70 (der sichtbare Bereicht zeigt ca. 60 Zeilen)
Dadurch wird das verschieben sehr schnell ausgeführt, stört kein bischen
Ist ein geiler Trick Danke!
Gruß Jörg

[Frabbing]

Etwas tiefer setzen geht auch. Wenn dein Prog überall "hackelfrei" laufen soll, würde ich ermitteln, wieviel Zeilen im sichtbaren Bereich liegen können. Je nach Größe der Systemschrift und BS passen bei dem einen mehr Einträge rein als bei jemand anderem.

[JörgG]

...würde ich ermitteln, wieviel Zeilen im sichtbaren Bereich liegen können...

ermitteln kann ich dies ja mit GetVisibleLines(H,B). Und mit mit ShowListview(H,X,Y,B,H) kann ich ja die Anzahl der Zeilen bestimmen (indirekt- ich mach das Fenster entweder etwas höher oder niedriger). Oder meinst du das anders?
Wie kann ich aber die Schriftart /-größe im Listview festlegen?
Gruß Jörg

[Frabbing]

Schau dir mal den Democode an, um eigene Schriftarten zu benutzen.
GetVisibleLines() ist dazu da, die Anzahl sichtbarer Zeilen zu bestimmen, genau.

[horsthorn]

@Jörg
So sieht der Anfangscode für eines meiner zwei Listview in meinem Dateibrowser aus:

PROC LINKES_FENSTER
PARAMETERS path1$
CHDIR path1$
L_font&=CREATE("FONT",font$,VAL(gross$),0,VAL(dick$),0,0)
IF checkbox$="0"
modus&=$30 'Mit diesem Modus wird immer gestartet
ELSEIF checkbox$="1"
modus&=$34
ENDIF
Case (linien$="1"):modus&=modus&+$1 'Linien Ja oder Nein
If (no_icon$="0") 'Icon oder nicht Icon ?
LINKS_VIEW&=CreateListView(%hwnd,%hinstance,RGB(VR%,VG%,VB%),RGB(HR%,HG%,HB%),-1,modus&)
SetImageList(LINKS_VIEW&,ilistL&)
SetFont LINKS_VIEW&,L_font&
ElseIf (no_icon$="1")
LINKS_VIEW&=CreateListView(%hwnd,%hinstance,RGB(VR%,VG%,VB%),RGB(HR%,HG%,HB%),-1,modus&)
SetFont LINKS_VIEW&,L_font&
EndIf

Die Informationen werden dazu aus einer INI-Datei gelesen, die über 'Einstellungen' nach dem Gefallen des Users verändert werden kann.
Mit der Listview.dll von Frank ist alles möglich

[JörgG]

Jo, Danke Horst, ist doch gleich viel verständlicher, wenn zu einem Thema ein kleiner Schnipsel zum "nachvollziehen" im Spiel ist

Im Rahmen dieses Projektes wollte ich den Inhalt einer Spalte auf eine bestimmte Anzahl von Zeichen einkürzen. Mein Schwerpunkt: es sollte schnell laufen (20.000 Einträge). Rausgekommen ist eine kleine Proc, die ich hier mal reinstellen wollte. Vllt. braucht jemand so etwas. Sie arbeitet nicht mit den üblichen Stringoperationen, sondern greift direkt auf dem Speicher zu:

proc kurz     
   'proc kürzt die inhalte einer spalte einer liestview auf eine bestimmte zeichenanzahl ein;
   'benötigt Frank Abbing's Listview.dll
   'parameter: handle von listview		(long)
	      'spaltenindex			(int)		
              'zeilenindex ab wo gekürzt wird	(long)
              'zeilenindex bis wo gekürzt wird	(long)
	      'position ab welche stelle gekürzt wird	(int)
	      'größe des bereichs, zum auslesen	(long)
    
    parameters lv&,sp%,st&,ed&,p%,mem&
    declare txt#	'nimmt den iteminhalt auf
    dim txt#,mem&	'ausreichend platz zuweisen

    whileloop st&, ed& 				'löppt den definierten tabellenabschnitt durch (st&-ed&)
          getitemtext(lv&,txt#,sp%,&loop)	'den inhalt von spalte X der aktuellen zeile in den speicherbereich txt# schreiben
          if MemPos(txt#,0,chr$(0)) > p% 	'wenn die position des nullbyte über 40 ist
             char txt#,p% = Chr$(0) 		'in das byte 40 des bereiches txt# ein nullbyte erzeugen (kennzeichnet das ende eines strings in einem bereich)
             setitemtext(lv&,txt#,sp%,&loop)	'den manipulierten (gekürzten) bereich in die tabelle zurückschreiben
          endif
    endwhile

endproc

Läuft wirklich flink...
Wichtiger Hinweis an Frank: Ich hatte zuerst anstelle MemPos() deine Funktion GetNullOffset(B) angewendet, die mir ja die pos. vom Nullbyte lieferte. Mit MemPos() war die Abarbeitung der kompletten Tabelle jedoch deutlich schneller. (Bitte nicht als "nörgelei" verstehen, vllt. ist das ja noch ein unentdeckter Bug), weil ja sonst deine Funktionen alle auf Geschwindigkeit zugeschnitten sind.
Gruß Jörg

[horsthorn]

@Jörg
Am besten gefällt mir in deinem Code das:

'löppt den definierten

Das Wort ist für mich neu
PS: Nicht böse sein

[Frabbing]

Wichtiger Hinweis an Frank: Ich hatte zuerst anstelle MemPos() deine Funktion GetNullOffset(B) angewendet, die mir ja die pos. vom Nullbyte lieferte. Mit MemPos() war die Abarbeitung der kompletten Tabelle jedoch deutlich schneller. (Bitte nicht als "nörgelei" verstehen, vllt. ist das ja noch ein unentdeckter Bug), weil ja sonst deine Funktionen alle auf Geschwindigkeit zugeschnitten sind.

Das Problem liegt beim häufigen Aufruf. Die Assembler-Funktionen funktionieren oft in 0 Millisekunden. Aber der Dll-Aufruf dauert jedes Mal 16 ms. Ruft man das in einer Schleife auf, dauert das eben.

[JörgG]

...der Dll-Aufruf dauert jedes Mal 16 ms.

könnte man die dll, oder einzelne Funktionen davon, so laden, daß der Aufruf einer enthaltenden Funktion wie ein direkter Befehl wirkt?
Vllt. die Funktion am Anfang des Progs in einem Speicherbereich laden & dort direkt ausführen oder sowas in dieser Richtung. - Wär ja schade, wenn deine Superschnelle Assemblerprogrammierung durch den dll-Aufruf (zumindest in einer Schleife) ausgebremst wird.
Ist aber jetzt einfach nur "laut gedacht" , so wie ich das mit meinem mageren Verständnis für dll & Co so interpretiere...
Gruß Jörg

[Frabbing]

Ich denke, ein Aufruf mit XProfans ImportDll/ImportFunc dürfte schneller sein.