| |
| |
|
 | [quote:482550d8c6]list_box&=CREATE(GRIDBOX,R_win&,File-Namen;0;200,1,10,140,200,170)
list_box&=CREATE(SORTEDLISTBOX,R_win&,,10,140,200,170)
[/quote:482550d8c6]
Mir ist aufgefallen, dass die Sortierung in der sortierten Listbox und in der Gridbox mit der Angabe 1 (sortiert) voneinander abweichen. Mache Io l' Fehler oder gibt es da einen Unterschied ? In beiden Bildern wurde das gleiche Unterverzeichnis geladen. |
|
| |
| |
| |
|
|
| Da anscheinend keiner eine Antwort weiss, kann nur noch Roland helfen -
@Roland
Warum sortiert die Gridbox nicht in der gleichen Art wie die SortedListbox ??? |
|
| |
| |
| |
|
|
RGH | Kann es sein, daß Du zu Ungeduld neigst? ;)
Ansonsten potuto ich die Frage nur an Bill Gates weiterleiten. In beiden Fällen setze ich einfach das Sortier-Flag (LVS_SORTASCENDING bzw. LBS_SORT). Auf die Sortierung habe ich und somit XProfan nicht den geringsten Einfluß.
Saluto
Roland |
|
| |
| Intel Duo E8400 3,0 GHz / 4 GB RAM / 1000 GB HDD - ATI Radeon HD 4770 512 MB - Windows 7 Home Premium 32Bit - XProfan X4 | 16.10.2006 ▲ |
|
| |
|
|
| Habe mir eine Pseudo-Gridbox geschrieben. Kann bestimmt noch verbessert werden. Um Mithilfe wird gebeten 
KompilierenMarkierenSeparierenDECLARE EE%,P_win&,P_grid&,P_stil%,P_txt%,P_font%
DECLARE stil$
EE%=0
PROC PSEUDO_GRIDBOX
DesTroyWindow(P_win&)
P_font%=CREATE("FONT","ARIAL",16,6,0,0,0)
PARAMETERS X0%,Y0%,X1%,Y1%,art%,titel$
WindowStyle 84
P_win&=CREATE("WINDOW",%HWND,"",X0%,Y0%,X1%,Y1%)
P_grid&=CONTROL("LISTBOX","",art%,1,25,(X1%-7),(Y1%-22),P_win&,101,%HINSTANCE)
P_stil%=CREATE("BUTTON",P_win&,titel$,1,1,(X1%-7),24)
SetFont P_txt%,P_font%
CLEARLIST
TEXTE
MoveListToHandle(P_grid&)
ENDPROC
PROC TEXTE
Addstring "Gerhard Schröder"
Addstring "Helmut Kohl"
Addstring "12345"
Addstring "Konrad Adenauer"
Addstring "Ludwig Erhard"
Addstring "Angela Merkel"
Addstring "67890"
Addstring "Helmut Schmidt"
Addstring Date$(2)
Addstring Date$(1)
Addstring "Sinnloser Text"
Addstring "Bla-Bla"
ENDPROC
----------------------------------
CLS
DrawText 10,10,"Kilck auf den Titelbutton sortiert oder unsortiert"
DrawText 10,30,"Listbox hat Mehrfachauswahl. Kann noch erweitert werden"
PSEUDO_GRIDBOX 200,200,250,200,$50B008C3,"Sortiert"
stil$="1"
SetActiveWindow(%HWND)
WHILENOT EE%
waitinput
If GetFocus(P_stil%)
IF stil$="1"
PSEUDO_GRIDBOX 200,200,250,200,$50B008C1,"Nicht sortiert"
stil$="0"
ELSEIF stil$="0"
PSEUDO_GRIDBOX 200,200,250,200,$50B008C3,"Sortiert"
stil$="1"
ENDIF
EndIf
Case ScanKey(27):END
='./../../references-fonction/xprofan/endwhile/'>ENDWHILE
Gehe jetzt arbeiten - mache das, was ich perfekt kann: Parkett verlegen !  |
|
| |
| |
| |
|
(644)
Deutsch
English
Français
Español
Italia
