XProfan

English

H.Brill

Hi,
i want gladly know, whether my Program in the Interpreter or as fertiges
Program runs. Can something like rausfinden ? into System-Variables Have
I time nothing found.

Benutze XPROFAN X3 + FREEPROFAN
Wir sind die XProfaner.
Sie werden von uns assimiliert.
Widerstand ist zwecklos!
Wir werden alle ihre Funktionen und Algorithmen den unseren hinzufügen.

Was die Borg können, können wir schon lange.

08/12/07 ▲

Vollständiges Quote

Absatzweise Quote Zeilenweise Quote

- Page 1 -

ReinerKlaas

Hi,
versuchs time with the Bedingten Compilierung in the chapter 5.7 Help To finen.....

Gruß
Reiner

XProfan 10.0a , Windows XP/Vista32

08/12/07 ▲

Vollständiges Quote

Absatzweise Quote Zeilenweise Quote

Rolf
Koch

I go of it from, that your Interpreter always PROFAN.EXE sounds, then might this here on simple profane point help:
Compile Mark Separation

cls
declare modus$,mod%
modus$=upper$(@Par$(0))

proc checkmodus

    if instr(PROFAN.EXE,modus$)

        mod%=0

    else

        mod%=1

    endif

endproc

checkmodus

if mod%=0

    print Ich laufe im Interpreter

else

    print Ich laufe als Exe

endif

waitinput

08/12/07 ▲

Vollständiges Quote

Absatzweise Quote Zeilenweise Quote

Dieter
Zornow

You can also simply $progdir inquire, is $Progdir your Profanverzeichnis then runs in the Interpreter

greetings 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

08/12/07 ▲

Vollständiges Quote

Absatzweise Quote Zeilenweise Quote

H.Brill

thanks,
help me already something moreover.
background is the :
I Games z. Z. something with the XDATA.inc of Ts-Soft. I have The Ressource
(in my case a DLL) through ResHacker as .res into Profan.exe and The Profrun32.exe eingebunden. having already a first success, if my Program
as finished Exe present is. the ought to but in Interpreter functions, what
I do not succeed. %HInstance and DEF @GetPID(0) ~GetCurrentProcessID() helped
me neither moreover, or. I get Speicherzugriffsfehler.

is it possible, that it in the Interpreter not at all goes ?

08/12/07 ▲

Vollständiges Quote

Absatzweise Quote Zeilenweise Quote

Dieter
Zornow

I know the part of course not, but if You a handle to that Interpreter need ought to the help.
Compile Mark Separation

Def Getmodulehandle(1) !KERNEL32,GetModuleHandleA

greetings 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

08/12/07 ▲

Vollständiges Quote

Absatzweise Quote Zeilenweise Quote

H.Brill

Yes, Have so did i already probiert (GetModuleHandle(0) and GetModuleHandle(%HInstance). where GetModuleHandle(0) the same Result How %HInstance has.

what setting one because as Parameter one ?

08/12/07 ▲

Vollständiges Quote

Absatzweise Quote Zeilenweise Quote

Dieter
Zornow

as Parameter must You whom way to that Interpreter indicate, so should it weg Compile Mark Separation Declare hdl&,profan$ if $progdir = Mein profanverzeichnis profan$ = $progdir+Profan.exe hdl& = Getmodulehandle(@Addr(profan$)) else profan$ = $progdir+meineexe.exe hdl& = Getmodulehandle(@Addr(profan$))
Er ist ein Mann wie ein Baum. Sie nennen ihn Bonsai., Win 7 32 bit und Win 7 64 bit, mit XProfan X2	08/12/07 ▲ Vollständiges Quote Absatzweise Quote Zeilenweise Quote

H.Brill

Runs neither.
as finished .Exe Yes, in the Interpreter again Speicherfehler.
Well, I were time. Perhaps white Yes Roland yet what.
would be indeed interestingly, if one yet 2 System-Variables
had : %Interpreter and %Program. Can otherwise Perhaps
too well use.

08/12/07 ▲

Vollständiges Quote

Absatzweise Quote Zeilenweise Quote

Michael
Wodrich

ex XProfan 10 there this vordefinierte Bedingungsnamen.

means through
Compile Mark Separation

 $IFDEF INTERPRETER
hier sind wir im Interpreter
 $ENDIF
 $IFDEF COMPILER
hier sind wir in der EXE
 $ENDIF

can itself at least the running I now in the Interpreter? eindeutig answer.

With the whom Modulhandles is so still not of table.
there's simply items, The in the Interpreter not so simply possible are.

Best wishes
Michael wodrich

Programmieren, das spannendste Detektivspiel der Welt.

08/12/07 ▲

Vollständiges Quote

Absatzweise Quote Zeilenweise Quote

Dieter
Zornow

I have me time this pkg of ts-soft Downloaded and ausprobiert, have a Profan.exe and a Prfrun32.exe time only with the Testprogrammen machine. runs by me in Interpreter correct, without each indicated whether the program in the Interpreter or as Exe runs. you have probably something other wrong made. Try simply times the Testprogramme from, The functions in each mode, because it'll automatically from the right File The Resource viewed or abgespielt.
statement from the Description
XDATA_Get(ResNr&, hModule&) hModule& is Optional. with are missing becomes The Resource in the Exe sought

greetings 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

08/12/07 ▲

Vollständiges Quote

Absatzweise Quote Zeilenweise Quote

H.Brill

Jo,
I will too time first make. I had me The Testprogramme only
short respected, then The command ausgedruckt and directly in my
Program umgesetzt.
If it working, login I again.

08/13/07 ▲

Vollständiges Quote

Absatzweise Quote Zeilenweise Quote

- Page 2 -

H.Brill

so, now functions it.
having my Testprogramm integrally new aufgebaut.
where the Error was, white I do not. Since I The MemoryModule.inc
into the bargain using having, could the Error too of there come
his. an Access violation is hold not so aussagekräftig.

thanks nevertheless all.

08/13/07 ▲

Vollständiges Quote

Absatzweise Quote Zeilenweise Quote

◄