XProfan

- Página 1 -

@Franco

Inwiefern?

Mit el Versión 11 meckert XProfan en Sub... en Deiner listview_funktionen.inc - Roland ha dazu extra una Inc-Expediente mitgeliefert para alte Programas profalt.inc para alte Profano-Programas, el no Operatoren benutzen. Daher pensamiento Yo, dass Usted el Sub en Deiner INC auch modernisieren müsstest

@Thomas
Kompilieren Marca Separación

GetItemText(etatO&,bereich#,3,2)
teil$=String$(bereich#,0)
print teil$
GetItemText(etatO&,bereich#,4,(anzO%-1))
end$=String$(bereich#,0)
print end$
teil!=VAL(teil$)
end!=VAL(end$)
end!=(end!-teil!)
betragO$=STR$(end!)
print betragO$
Sendmessage(etatO&,$1008,2,0)
OBEN_AKTIV Hier wird die Anzeige in einer eigenen Procedur aktu

So sieht mein Probecode de y yo denke, dass unterm Strich el herauskommt, qué me vorschwebt.
Printen tut él ya veces el, Yo voluntad. Jetzt sólo aún en el Bucle y luego neu abspeichern.
(Wunder Usted nocht en grossen O - como I, con zwei Mostrar arbeite, tener Yo el Variables con Oben y Unten getrennt)

Frank
Abbing

Daher pensamiento Yo, dass Usted el Sub en Deiner INC auch modernisieren müsstest

Natürlich, con el neuen Versión hay entonces una geänderte Inc. Ist sowieso erheblich schlanker geworden, como Yo sechs Procs y Defs ahora direkt en el Dll integriert habe.

@Franco

[offtopic] Nun verrate uns doch veces, wer el Hübsche en Deinem Atavar es ? - Su Enkelin oder... ?

[/offtopic]

- Página 2 -

Frank
Abbing

Enkelin? Zähle mich Por favor, no a deinem Renter-Club.

[offtopic]

Enkelin? Zähle mich Por favor, no a deinem Renter-Club.

Aber wer es entonces ? - Tochter, Freundin

?[/offtopic]

Frank
Abbing

Knapp vorbei.

Thomas
Freier

In cada Fall erfrischend.

Gruß Thomas
Windows XP SP2, XProfan X2

Michael
Wodrich

El Werte en un Array halten y Roland bitten, daß él en el MAT-Características todavía una Start- y Endparameter einbaut.

Dann kann el entspreichende Array-Zona en un Resbalón en el neuesten Stand gebracht voluntad. El entsprechenden Zeilen müssten entonces en uno Bucle el neuen Werte bekommen.

Ohne el MAT Geschichte podría al entonces sí en uno PROC erledigen con entsprechenden Parametern.

Schöne Grüße
Michael Wodrich

Programmieren, das spannendste Detektivspiel der Welt.

01.01.2008 ▲

@Michael

Ohne el MAT Geschichte podría al entonces sí en uno PROC erledigen con entsprechenden Parametern.

Bin esta

01.01.2008 ▲

Dieter
Zornow

¡Hola Horst,

hatte veces antes de laengerer Tiempo auch así una Programa anzufangen, entonces aber el Lust perdido, du hast mich inspiriert algo más a hacer. Fuer Gridboxen Yo veces el genommen, es todavía no optimiert aber funktioniert
Kompilieren Marca Separación

Proc neurechnen

    declare betrag!,konto!,line$,op$,put$
    clearlist

    whileloop 0,getcount(box&)-1

        line$ = Getstring$(box&,&loop) String aus Listview
        op$ = trim$(substr$(line$,4,|)) Operator + oder -
        betrag! = Val(trim$(substr$(line$,5,|))) Betrag mit dem gerechnet wird

        if &loop = 0

            if op$ = -

                konto! = 0-betrag!

            else

                konto! = betrag!

            endif

        else

            if op$ = +

                konto! = konto! + betrag!

            else

                konto! = konto! - betrag!

            endif

        endif

        put$ = trim$(substr$(line$,1,|))+|+trim$(substr$(line$,2,|))+|+trim$(substr$(line$,3,|))+|
        +trim$(substr$(line$,4,|))+|+trim$(substr$(line$,5,|))+|+str$(konto!)
        addstring put$ in Listboxliste

    endwhile

    clearlist box&
    movelisttohandle(box&)

ENDPROC

Gruss de Bangkok

Dieter

Er ist ein Mann wie ein Baum. Sie nennen ihn Bonsai., Win 7 32 bit und Win 7 64 bit, mit XProfan X2

03.01.2008 ▲

@Dieter
Gracias para el Tip, pero yo habe umgestellt en el Listview.dll de Franco y dafür Yo el código fertig. (Löschen OK - ahora muss todavía Umbewegen y Kopieren geschrieben voluntad - (lo son tan zwei Eingabe-Listen en MoneyGuard-2 disponible.) - Dann kommt el erste Beta-Versión en el Comunidad) - aber en el Moment tener Todavía wichtigeres a tun - Mi Enkel, 15 y 16 Jahre de Euskirchen a Besuch en me, haben mich voll en el Griff

03.01.2008 ▲