XProfan

English

Das
Dutzend

Hello
i was in the Time of Profan 3 To Profan 7 already right active. having thereafter a longer interval made and I me now Profan 11 zugelegt. I see already, I must yet some nachholen. therefore come I now To my first trouble. always, if I Images load, are missing always some BMP´s, How z.B. in this Probe:
Compile Mark Separation

DECLARE X%,Y%,B%,D%,A1$,A2$,A3$,A4$,X1%,Y1%,EBENE%
WINDOWSTYLE 31
WINDOWTITLE "FG-Mahjongg"
WINDOW 10,10-300,350
CLS @RGB(153,0,0)
X1%=20
Y1%=20
B%=2
D%=1
EBENE%=1

WHILE EBENE%<4

    Y%=Y1%

    WHILE Y%<250

        X%=X1%

        WHILE X%<180

            A1$="a_"+TRIM$(STR$(B%))+"_1.BMP"
            A2$="a_"+TRIM$(STR$(B%))+"_2.BMP"
            A3$="a_"+TRIM$(STR$(B%))+"_3.BMP"
            A4$="a_"+TRIM$(STR$(B%))+"_4.BMP"
            DrawPic A1$, X%, Y%; -1
            DrawPic A2$, X%+28, Y%; -1
            DrawPic A3$, X%, Y%+38; -1
            DrawPic A4$, X%+28, Y%+38; -1
            X%=X%+49

        ENDWHILE

        Y%=Y%+69

    ENDWHILE

    EBENE%=EBENE%+1
    X1%=X1%-6
    Y1%=Y1%-6

ENDWHILE

WAITINPUT
END

under Profan 7 and Windows 2000 functions this without Problems (there though yet with LoadBMP). under Profan 11 and Windows Vista missing the last BMP.

can someone say, Why this lying.

Ps.: who pleasure has, can Yes my programs standing, The I already with older Profan-versions prepares have. [...]

12/11/09 ▲

Vollständiges Quote

Absatzweise Quote Zeilenweise Quote

Das
Dutzend

Upps: here over again the image:

12/11/09 ▲

Vollständiges Quote

Absatzweise Quote Zeilenweise Quote

try vlt. time in that Memory bitmap (MCLS/ StartPaint -1) to drawing and then one MCopyBmp - obs trouble still appears.

12/11/09 ▲

Vollständiges Quote

Absatzweise Quote Zeilenweise Quote

Das
Dutzend

the was my first attempt. the fehlten even yet More Images. the eigenartige is, once I the window shift, go The fehlende Images displayed.

12/11/09 ▲

Vollständiges Quote

Absatzweise Quote Zeilenweise Quote

Jörg
Sellmeyer

you should you time mehrdimensionale Arrays standing and so a new Ansatz begin. the ought to The management your Images vastly vereinfachen.
Also can You rather The Create("Bitmap",...)/Create("HPIC",...)-Opportunities benefit, there You then aimed Images delete can.
Compile Mark Separation

A1$="a_"+TRIM$(STR$(B%))+"_1.BMP"

I seh in Your code not, Why B% as Variable auftaucht, if it in the Loop not changed becomes.

the eigenartige is, once I the window shift, go The fehlende Images displayed.

Perhaps time one Repaint end the Loop install?

Windows XP SP2 XProfan X4
... und hier mal was ganz anderes als Profan ...

12/11/09 ▲

Vollständiges Quote

Absatzweise Quote Zeilenweise Quote

Das
Dutzend

I seh in Your code not, Why B% as Variable auftaucht, if it in the Loop not changed becomes.

I have a more View source this short zusammengebastelt, only to veranschauung

you should you time mehrdimensionale Arrays standing and so a new Ansatz begin.

the could I time try

@if: it functions still (I had one small Error installed), but here becomes the entire screen too first then displayed, if I the window shift, or The Fenstergröße change.

under 16 bit-colours functions everything, and under 32-bit-colours not.

12/11/09 ▲

Vollständiges Quote

Absatzweise Quote Zeilenweise Quote

Jörg
Sellmeyer

Poste still time a lauffähigen code inclusive Bilddateien. you become either at create the Codes check, Why it's located or we can here together rauskriegen, where it hakt.

it functions still (I had one small Error installed)

you see Yes, that we so only blind guess can.

Windows XP SP2 XProfan X4
... und hier mal was ganz anderes als Profan ...

12/12/09 ▲

Vollständiges Quote

Absatzweise Quote Zeilenweise Quote

Das
Dutzend

it's about my Mahjongg-game, that I time with Profan 5 ??? written, and later with Profan 7 extended have. [...]

over ands over again I get Mails, the users with Vista difficulty so having. (under Win 98, ME, 2000 runs it super). I had really virtual, if I me Profan 11 fetch, and simply new Compiliere is the trouble of table. but there dive yet More Problems on. yesterday be I started, the whole game new To write, if not works, come I again. into many new functions since then must I first reinlesen. today can it certainly circa some vereinfachen.
OGL would certainly too a crazy idea, but To I the gecheckt have, passing well another Time.
the original of then has 1700 Program lines, the would like I you not do.

12/12/09 ▲

Vollständiges Quote

Absatzweise Quote Zeilenweise Quote

Thomas
Freier

I had really virtual, if I me Profan 11 fetch, and simply new Compiliere is the trouble of table.

with the eingebundenen profalt.inc tested or with the XProfan 8.1 (now spare) compiliert?

Gruß Thomas
Windows XP SP2, XProfan X2

12/12/09 ▲

Vollständiges Quote

Absatzweise Quote Zeilenweise Quote

Das
Dutzend

No, teh folks command have I already swapped (LoadBMP To DRAWPIC, DBOPEN() To DB("Open"), createtext() To create("Text") etc.)

12/12/09 ▲

Vollständiges Quote

Absatzweise Quote Zeilenweise Quote

Sebastian
Sprenger

have you got yet whom suggestion of Jörg seen, end the Loop whom commands "repaint" To settle?

Profan² 7.0e, XProfan 9, 11.2a, FreeProfan32

Windows Vista Home Premium 32-Bit, 2.8 Ghz, 4 GB RAM

Windows Me, 1.8 Ghz, 256 MB RAM

12/12/09 ▲

Vollständiges Quote

Absatzweise Quote Zeilenweise Quote

Das
Dutzend

the functions. with the proposition have I though too Bitmaps, The with MLoadBmp/MCopyBmp loaded go, here have I furthermore Problems. The Solution have I but already found. I have The Bitmaps zerschnitten, and load these now with DRAWPIC. therefore get of course from 3 BMP ca. 450 BMP, but what reserves. Currently memory I these in a DLL. have straight again a Mail receive, this time went it for a windows 7-trouble.

I thanks you first time.