| |
| |
|
E.T. | Lt. Aider X2 > Techn. données devoir sich qui möglichen Einträge dans qui Listboxliste sur
"2 Mia Einträge dans qui Listboxliste"
augmenté avons (eigentlich déjà ab 11).
Dem ist wohl pas so (es folgt umständliches Beispiel  ) :
KompilierenMarqueSéparationwindowtitle "Listboxlisten - Test " + $ProfVer
windowstyle 1024+16+8
window 250,150
var txt1& = @Control("STATIC", "Fülle Listboxliste...", $50000001,0,3,width(%hwnd),15, %hWnd,0, %hInstance)
var txt2& = @Control("STATIC", "- - -", $50000001,0,20,width(%hwnd),15, %hWnd,0, %hInstance)
var txt3& = @Control("STATIC", "Füllstand lt. getcount(0) :", $50000001,0,50,width(%hwnd),20, %hWnd,0, %hInstance)
var txt4& = @Control("STATIC", "- - -", $50000001,0,75,width(%hwnd),15, %hWnd,0, %hInstance)
whileloop 1,300000
settext txt2&,format$("###,##0" ,&loop)
addstring(0,str$(&loop))
settext txt4&, format$("###,##0" ,getcount(0))
endwhile
waitinput
end
comment on voyons peux, bleibt qui LBL toujours chez 262.144 stehen, chez mir zumindest. Drum hab je aussi qui Profan-Version la fois dans qui Titelzeile eingebunden, um sûrement pour aller, dans qui richtigen Version trop son.
 |
 |
| |
| Grüße aus Sachsen... Mario  WinXP, Win7 (64 Bit),Win8(.1),Win10, Win 11, Profan 6 - X4, XPSE, und 'nen schwarzes, blinkendes Dingens, wo ich das alles reinschütte... | 07.09.2012 ▲ |
|
| |
|
|
E.T. | Huch, si on einmal beim testen ist:
sous 11.2 funktioniert es aussi pas, gibt's mais wenigstens encore 'ne Fehlermeldung,
quelle ab X2 fehlt:
 |
|
| |
| XProfan X2Grüße aus Sachsen... Mario WinXP, Win7 (64 Bit),Win8(.1),Win10, Win 11, Profan 6 - X4, XPSE, und 'nen schwarzes, blinkendes Dingens, wo ich das alles reinschütte... | 07.09.2012 ▲ |
|
| |
|
|
Peter
Max
Müller | sur qui Listbox-liste page qui Aider steht:
depuis jeher kennt XProfan une Stringliste, qui sogenannte "Listboxliste". Ursprünglich geplant, um données pour qui Anzeige dans einer vorgegebenen Listbox avec @Listbox$ anzuzeigen, vermag vous cependant viel plus. Ab Version 11 peux vous jusque 260.000 Cordes aufnehmen et verwalten.
|
|
| |
| |
| |
|
|
 | |
| |
|
|
RGH | ensuite veux je la fois quelque chose Licht ins Dunkel apporter:
dans qui acte ist qui frontière geblieben.
mais comme aus dem Befehl AddStrings un partie qui Funktion AddStrings() wurde, wurde oublier qc, qui Fehlermeldung trop prendre.qui Funktion AddStrings() liefert mais 1 zurück, si vous erfolgreich était et 0, si pas.
Pour AddStrings(0,...) pourrait je qui Fehlermeldung naturellement wieder einbauen.
(je hatte zwischenzeitlich une dynamische variante probiert, qui wirklich MAXINT comme frontière gehabt hätte, mais qui était deutlich langsamer. Daher J'ai eu en wieder la distance pris. je pourrait allerdings qui frontière sur ca. 1 million erhöhen, si besoin bsteht.)
Salut
Roland |
|
| |
| XProfan X2Intel Duo E8400 3,0 GHz / 4 GB RAM / 1000 GB HDD - ATI Radeon HD 4770 512 MB - Windows 7 Home Premium 32Bit - XProfan X4 | 04.01.2013 ▲ |
|
| |
|
|
Jörg
Sellmeyer | | toujours so hoch comme allez, sans dass dadurch Abstriche à anderer Stelle gemacht volonté doit. |
|
| |
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ...  | 04.01.2013 ▲ |
|
| |
|
|
| | Spricht quelque chose dagegen simple qui Microsoft interne Listbox trop verwenden? qui scheint mir am schnellsten chez bestimmtem Stil et verkraftet viel plus Einträge. Den Stil muss je raussuchen. |
|
| |
| |
| |
|
|
RGH | iF (04.01.13)
Spricht quelque chose dagegen simple qui Microsoft interne Listbox trop verwenden? qui scheint mir am schnellsten chez bestimmtem Stil et verkraftet viel plus Einträge. Den Stil muss je raussuchen.
Den Gedanken J'ai eu aussi déjà. ensuite pourrait es aussi une Systemvariable avec dem Windows-Handle qui Listbox-liste donner. (qui avec create("LIST",...) erzeugten Stringlisten sommes oui aussi rien d'autre comme Listboxen sans Anzeige.)
Salut
Roland |
|
| |
| XProfan X2Intel Duo E8400 3,0 GHz / 4 GB RAM / 1000 GB HDD - ATI Radeon HD 4770 512 MB - Windows 7 Home Premium 32Bit - XProfan X4 | 04.01.2013 ▲ |
|
| |
|
|
RGH | BTW: je nutze folgende Funktion zum Erzeugen qui Listen:
CreateWindow('LISTBOX', nil, sort or multi,0, 0, 0, 0, 0, 0, HInstance, NIL)
alors gar keinen Stil sauf peut-être lbs_sort et/ou bien lbs_multiplesel.
Salut
Roland |
|
| |
| XProfan X2Intel Duo E8400 3,0 GHz / 4 GB RAM / 1000 GB HDD - ATI Radeon HD 4770 512 MB - Windows 7 Home Premium 32Bit - XProfan X4 | 04.01.2013 ▲ |
|
| |
|
|
RGH | Ok, j'ai es plan getestet:
avec qui Listbox-liste dauert z.B. cela AddStrings etwa 4 la fois so longtemps, comment qui bisherige Solution. cela betrifft ensuite so Sachen comment AddFiles ou bien qui ganzen MoveToList-Funktionen. je denke, c'est pas Sinn qui l'affaire.
Salut
Roland |
|
| |
| XProfan X2Intel Duo E8400 3,0 GHz / 4 GB RAM / 1000 GB HDD - ATI Radeon HD 4770 512 MB - Windows 7 Home Premium 32Bit - XProfan X4 | 04.01.2013 ▲ |
|
| |
|
|
| sur meinem ordinateur i7-3770K ist cela Befüllen qui internen ListBoxListe chez
250.000 Entrées ca. 13 la fois plus rapide comme AddStrings sur un ListBox-Contrôle
et dauert 281ms.
Télécharger
KompilierenMarqueSéparation {$cleq}
cls
print "250.000:\nX:",test2(250000),"ms\nI:",test3(250000),"ms\n"
print " 50.000:\nX:",test2(50000),"ms\nI:",test3(50000),"ms\n"
print " 5.000:\nX:",test2(5000),"ms\nI:",test3(5000),"ms\n"
print " 200:\nX:",test2(200),"ms\nI:",test3(200),"ms\n"
waitinput
end
Proc test2(long c)
long lst=create("list",0)
long tme=getTickCount
whileloop c
addstring(lst,"1234567890")
wend
tme=getTickCount-tme
destroyWindow(lst)
return tme
endproc
Proc test3(long c)
clearlist
long tme=getTickCount
whileloop c
addstring "1234567890"
wend
tme=getTickCount-tme
return tme
endproc
|
|
| |
| |
| |
|
|
Julian
Schmidt | | chez meinen calculateur ist es sogar encore krasser. Um qui 27-28 la fois plus rapide... |
|
| |
| |
| |
|
(949)
Deutsch
English
Français
Español
Italia
