| |
| |
|
| - Page 1 - |
|
E.T. | Lt. Help X2 > Techn. data should the possible Entries in the Listboxliste on
"2 Mia Entries in the Listboxliste"
increased having (really already ex 11).
the is well not so (it follows umständliches example  ) :
CompileMarkSeparationwindowtitle "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
How one see can, remaining The LBL still with 262.144 stand, by me at least. thatswhy Have so did i The Profan-Version time into Headline eingebunden, circa sure to go, in the right Version To his.
 |
 |
| |
| 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... | 09/07/12 ▲ |
|
| |
|
|
| |
| |
| - Page 1 - |
|
Peter
Max
Müller | on the Listbox-list Page Help standing:
since jeher knows XProfan a Stringliste, The so-called "Listboxliste". original planned, circa data for display in a pretended Listbox with @Listbox$ view, vermag tappt im dunkeln however plenty More. ex Version 11 can tappt im dunkeln up to 260.000 Strings take in and manage.
|
|
| |
| |
| |
|
|
 | has of course not very something with the trouble To do but wished nevertheless what testing...
CompileMarkSeparation |
|
| |
|
|
RGH | then I will time something light in that dark bring:
in the doing is the boundary stayed.
but as from the commands AddStrings one part the function AddStrings() watts, watts forget, The Error Message To take.The function AddStrings() supply but 1 back, as they successful was and 0, unless.
for AddStrings(0,...) could I The Error Message naturally again install.
(I had zwischenzeitlich a dynamic Variante probiert, The really MAXINT as boundary had had, but the was explicit slower. therefore I had of it again stood off taken. I could though The boundary on ca. 1 million raise, if want bsteht.)
Greeting
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 | 01/04/13 ▲ |
|
| |
|
|
Jörg
Sellmeyer | | always so high as goes, without that therefore Abstriche on another place made go must. |
|
| |
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ...  | 01/04/13 ▲ |
|
| |
|
|
| | speaks something against it simply The Microsoft interne Listbox To use? The shining me on the fastest with bestimmtem Style and verkraftet plenty More Entries. whom Style must I raussuchen. |
|
| |
| |
| |
|
|
RGH | iF (04.01.13)
speaks something against it simply The Microsoft interne Listbox To use? The shining me on the fastest with bestimmtem Style and verkraftet plenty More Entries. whom Style must I raussuchen.
whom thoughts I had already. then could it too a Systemvariable with the windows-lever the Listbox-list give. (The to create("LIST",...) begot Stringlisten are so too nothing other as Listboxes without display.)
Greeting
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 | 01/04/13 ▲ |
|
| |
|
|
RGH | BTW: I use following function to that produce the lists:
CreateWindow('LISTBOX', nil, sort or multi,0, 0, 0, 0, 0, 0, HInstance, NIL)
means quite none Style except possibly lbs_sort and/or lbs_multiplesel.
Greeting
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 | 01/04/13 ▲ |
|
| |
|
|
RGH | OK, I have it even tested:
with the Listbox-list lasts z.B. the AddStrings about 4 time such a long time, as previous Solution. the concerns then so things How AddFiles or The whole MoveToList-functions. i think, this is not sense the thing.
Greeting
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 | 01/04/13 ▲ |
|
| |
|
|
| On my computer i7-3770k is the Befüllen the internen ListBoxListe with
250.000 Einträgen ca. 13 time faster as AddStrings on one ListBox-Control
and lasts 281ms.
Download
CompileMarkSeparation {$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 | | with my computer is it even yet krasser. around the 27-28 time faster... |
|
| |
| |
| |
|
| |
| |
| - Page 2 - |
|
|
RGH | with others Worten: The Idea with the ListboxListe as Windowscontrol can I safely streichen!
Greeting
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 | 01/04/13 ▲ |
|
| |
|
|
| | @Roland: points You what Delphi there power that I the whom nProcs too procure can? I have something like How Arrays not yet implementiert. |
|
| |
| |
| |
|
(941)
Deutsch
English
Français
Español
Italia
