XProfan

- Page 1 -

@Frank

Inwiefern?

with the Version 11 bleats XProfan over The Sub... in your listview_funktionen.inc - Roland has moreover extra a Inc-File included for old programs profalt.inc for old Profan-programs, The no Operators using. therefore I thought, that You, the Sub in your INC too modernisieren müsstest

@Thomas
Compile Mark Separation

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 sees my Probecode from what about me think, that under Strich the herauskommt, what me vorschwebt.
Printen does it already time the, I wants. now only still in The Loop and then new abspeichern.
(wonder you nocht over The grossen O - I with two Show work, Have I The variables with supra and under separated)

Frank
Abbing

therefore I thought, that You, the Sub in your INC too modernisieren müsstest

naturally, with the new Version there then a geänderte Inc. is anyhow vastly schlanker become, I six Procs and Defs now directly in The Dll integrate have.

@Frank

[offtopic] now verrate us still time, who The Pretty on Your Atavar is ? - your granddaughter or... ?

[/offtopic]

- Page 2 -

Frank
Abbing

granddaughter? count me Please not To your Renter-Club.

[offtopic]

granddaughter? count me Please not To your Renter-Club.

but who is it then ? - daughter, girl-friend

?[/offtopic]

Frank
Abbing

concise past.

Thomas
Freier

In each drop refreshing.

Gruß Thomas
Windows XP SP2, XProfan X2

Michael
Wodrich

The values in a aray hold and Roland requests, that it into MAT-functions yet a Start- and Endparameter einbaut.

then can the entspreichende aray-area in a Slip on the latest stood brought go. The suitable Lines müssten then in a Loop The new values get.

without The MAT story could to the then Yes in a PROC manage with suitable Parameters.

Best wishes
Michael Wodrich

Programmieren, das spannendste Detektivspiel der Welt.

01/01/08 ▲

@Michael

without The MAT story could to the then Yes in a PROC manage with suitable Parameters.

be thereby

01/01/08 ▲

Dieter
Zornow

Hello Horst,

having time to laengerer Time too so one Program to begin, then but the pleasure lost, you have me inspired something moreover To make. Fuer Gridboxen have I time the taken, is not yet optimiert but functions
Compile Mark Separation

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

greeting from 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

01/03/08 ▲

@Dieter
thanks for hint, but I have umgestellt on The List view.dll of Frank and for have I the code ready. (Delete OK - now must yet Umbewegen and copy written go - (there are Yes two input-lists in MoneyGuard-2 present.) - then comes The first Beta-Version into Community) - but in the momentum Have I yet wichtigeres To do - my grandson, 15 and 16 years from Euskirchen To visiting by me, having me fully in the handle

01/03/08 ▲