| |
| |
|
| - page 1 - |
|
Jörg
Sellmeyer | allô Frank,
Könntest Du peut-être une Funktion zur fortlaufenden Numerierung qui Spalten einbauen?
Etwa so:
KompilierenMarqueSéparation
Proc SetNumbers
Parameters LV&,Spalte&,hdl&,Text$
Declare nr$,Lines&,00$
Lines& = GetLines(LV&)
00$ = MkStr$("0",Len(Str$(Lines&)))
If %pcount = 1
WhileLoop 0,Lines& -1
Case IsKey(27):Break
nr$ = Format$(00$,&Loop)
SetItemText(LV&,Addr(nr$),Spalte&,&Loop)
Wend
ElseIf %pcount = 3
WhileLoop 0,Lines& -1
Case IsKey(27):Break
nr$ = Format$(00$,&Loop)
SetItemText(LV&,Addr(nr$),Spalte&,&Loop)
SetText hdl&,Text$ + nr$
bei hoher Geschwindigkeit erübrigt sich das mit dem Text evtl. aber so ist eine
Fortschrittsanzeige möglich
Wend
EndIf
ENDPROC
je hatte dernièrement cela plaisir quelques -zigtausend Zeilen trop numerieren.
dans Assembler dauert cela wahrscheinlich seulement Millisekunden.
avec Profan habe je pour 10 Minuten chez ca. 50000 abgebrochen.
Salut
Jörg |
|
| |
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ...  | 02.03.2005 ▲ |
|
| |
|
|
| |
| |
| - page 1 - |
|
 | Gib ihm doch simple nen xpia-beispiel 
Salve, iF |
|
| |
| |
| |
|
|
Frank
Abbing | Hi,
pourrait je naturellement faire. mais je halte so une Funktion pour qui Listview.dll pour très sinnvoll. tout autor werde je vous là aufnehmen.  |
|
| |
| |
| |
|
|
| Richtig - finde je aussi Sinnvoll!
So un Beispielchen wäre quand même très intéressant et bien chez Deinen ASM-Beispielen aufgehoben - ou bien sogar ici.
Es serait arrêt montrer comment on qui Listview.DLL (wohin es oui doch souvent um viele Einträge allez) avec XPIA zusammen nutzen peux.
Salve, iF |
|
| |
| |
| |
|
|
Frank
Abbing | Hi.
[quote-part:67a10e7051]Es serait arrêt montrer comment on qui Listview.DLL (wohin es oui doch souvent um viele Einträge allez) avec XPIA zusammen nutzen peux. [/quote-part:67a10e7051]
Ist doch seulement une Boucle, dans qui une Message toujours wieder aufgerufen wird. Weder intéressant, encore pour sonderlich lehrreich. et seulement entier wenig Assembler, pour plus Strukturen...  |
|
| |
| |
| |
|
|
Jörg
Sellmeyer | >Weder intéressant, encore pour sonderlich lehrreich.
Ooch... mach doch la fois quand même :roll: |
|
| |
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ... | 03.03.2005 ▲ |
|
| |
|
|
| @Jörg: Du hältst Frank fest - je kitzle Ihn à de Füße jusqu'à ihm qui ASM-25-Zeiler ausm Gesicht fällt. 
Salve, iF  |
|
| |
| |
| |
|
|
CB | OhGottohGott
je habs mir justement versucht, bildlich vorzustellen, comment cela wohl air mag, si Frank lachend et kichernd Assembler flucht  |
|
| |
| |
| |
|
|
Jörg
Sellmeyer | cela wär doch la fois quoi!  |
|
| |
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ... | 04.03.2005 ▲ |
|
| |
|
|
Frank
Abbing | Hi,
comment, quoi? une Verschwörung?
je peux qui Funktion volontiers ici posten, si vous fertig ist. Hab mais seulement encore autre Sachen trop 1faire.  |
|
| |
| |
| |
|
|
Frank
Abbing | Hi,
qui Funktion ist fertig et heisst SetLineNumbers().
ici qui Code, je hoffe il est verständlich:
KompilierenMarqueSéparationinvoke SendMessage,[ebp+8],4100,0,0
mov ecx,eax ; ecx = Anzahl Zeilen
xor edi,edi ; edi = Zeile = 0
.if ecx!=0
mov esi,[ebp+8] ; esi = Handle
mov edx,[ebp+12] ; edx = Startzeilennummer
routea:
push ecx
push edx
push edi
push edi
push [ebp+16]
push OFFSET unwichtig5
push [ebp+8]
invoke dwtoa,edx,addr unwichtig5
call SetItemText
pop edi
pop edx
pop ecx
inc edx
inc edi
cmp ecx,edi
jne routea
xor eax,eax
.endif
|
|
| |
| |
| |
|
| |
| |
| - page 2 - |
|
|
Jörg
Sellmeyer | allô Frank,
super! Kannste cela chez Gelegenheit nochmal un un peu kommentieren?
Irgendwie ist ca Assemblerkrams pour mich chinoise dans Tüten.
Salut
Jörg |
|
| |
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ... | 13.03.2005 ▲ |
|
| |
|
|
Frank
Abbing | Hi,
qui benutzten Register sommes oui kommentiert.
qui Pushs poser Werte sur dem Stack ab, qui Pops holen vous wieder runter. cela Invoke appelez une Funktion sur, um payons dans Cordes trop wandeln. cela Call appelez une autre Listview.dll-Funktion sur. devant qui Pushs sommes qui paramètre, dans umgekehrter Reihenfolge sur dem Stack abgelegt. |
|
| |
| |
| |
|
(850)
Deutsch
English
Français
Español
Italia