XProfan

- page 1 -

@Frank

Inwiefern?

avec qui Version 11 meckert XProfan sur qui Sous... dans Deiner listview_funktionen.inc - Roland hat en supplément extra une Inc-Dossier mitgeliefert pour vieille Programme profalt.inc pour vieille Profan-Programme, qui aucun Operatoren benutzen. Daher dachte je, dass Du cela Sous dans Deiner INC aussi modernisieren müsstest

@Thomas
Kompilieren Marque Séparation

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 mon Probecode aus et je denke, dass unterm Strich cela herauskommt, quoi mir vorschwebt.
Printen tut il déjà la fois cela, quoi je veux. maintenant seulement encore dans qui Boucle et ensuite récente abspeichern.
(Wunder toi nocht sur qui grossen O - là je avec deux Montrer arbeite, hab je qui Variablen avec dessus et Unten getrennt)

Frank
Abbing

Daher dachte je, dass Du cela Sous dans Deiner INC aussi modernisieren müsstest

Bien sûr, avec qui neuen Version gibt es ensuite une geänderte Inc. Ist sowieso erheblich schlanker geworden, là je six Procs et Defs maintenant direct dans qui Dll integriert habe.

@Frank

[offtopic] eh bien verrate uns doch la fois, qui qui Hübsche sur Deinem Atavar ist ? - Votre Enkelin ou bien... ?

[/offtopic]

- page 2 -

Frank
Abbing

Enkelin? Zähle mich s'il te plaît pas trop deinem Renter-Club.

[offtopic]

Enkelin? Zähle mich s'il te plaît pas trop deinem Renter-Club.

mais qui ist es ensuite ? - fille, amie

?[/offtopic]

Frank
Abbing

Knapp vorbei.

Thomas
Freier

dans chaque le cas erfrischend.

Gruß Thomas
Windows XP SP2, XProfan X2

Michael
Wodrich

qui Werte dans einem Array tenir et Roland bitten, qui il dans qui MAT-Funktionen encore une Start- et Endparameter einbaut.

ensuite peux qui entspreichende Array-Bereich dans einem Glissement sur den neuesten Stand gebracht volonté. qui entsprechenden Zeilen müssten ensuite dans einer Boucle qui neuen Werte bekommen.

sans qui MAT Geschichte pourrait on cela ensuite oui dans einer PROC erledigen avec entsprechenden Parametern.

belle Grüße
Michael Wodrich

Programmieren, das spannendste Detektivspiel der Welt.

01.01.2008 ▲

@Michael

sans qui MAT Geschichte pourrait on cela ensuite oui dans einer PROC erledigen avec entsprechenden Parametern.

suis dabei

01.01.2008 ▲

Dieter
Zornow

allô Horst,

hatte la fois avant laengerer Zeit aussi so un Programme anzufangen, ensuite mais qui Lust verloren, tu as mich inspiriert quelque chose plus trop faire. Fuer Gridboxen habe je la fois cela pris, ist encore pas optimiert mais funktioniert
Kompilieren Marque Séparation

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 aus 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
merci pour den Tip, mais j'ai umgestellt sur qui Listview.dll de Frank et pour habe Je l' Code fertig. (Effacer OK - maintenant muss encore Umbewegen et Kopieren geschrieben volonté - (il y a oui deux Eingabe-Listen dans MoneyGuard-2 vorhanden.) - ensuite venez la première Beta-Version dans qui Community) - mais im Moment hab je encore wichtigeres trop 1faire - mon Enkel, 15 et 16 Jahre aus Euskirchen trop Besuch chez mir, avons mich voll im Griff

03.01.2008 ▲