PureBoard

Verfasst: **15.04.2007 00:13**

@jear
IncludeBinary ist eine Compilerdirektive
PokeL und FileSize werden zur RunTime ausgeführt

Das kann so nicht gehen

Verfasst: **15.04.2007 01:00**

Bitte mal kompilieren.

Code: Alles auswählen

Procedure Test(*Pointer) 
  FLen.l = PeekL(*Pointer) 
  SStart.l = *Pointer + SizeOf(Long) 
  MessageRequester("Drinnen", "Startadresse : " + Str(SStart)+ #LF$ + "Länge : " + Str(FLen) , #MB_OK|#MB_ICONINFORMATION) 
EndProcedure 

; Länge der IncludeDatei 
FLen.l = ?dateiE - ?datei 
PokeL(?dateiL, FLen) 
MessageRequester("Draußen", "Startadresse : " + Str(?datei)+ #LF$ + "Länge : " + Str(FLen) , #MB_OK|#MB_ICONINFORMATION) 

Test(?dateiL) 

DataSection
  dateiL: Data.l 0  
  datei: IncludeBinary "foto.jpg"
  dateiE: 
EndDataSection

Sorry. Mir ging es um die Parameterübergabe mit einem einzigen Pointer.
Ohne FileSize() geht es aber auch.

Verfasst: **15.04.2007 01:11**

denkfehler:

Code: Alles auswählen

FLen.l = FileSize("foto.jpg")

dazu müsste die datei zur laufzeit im verzeichnis sein,
dann muss ich sie auch nicht includieren.

Verfasst: **15.04.2007 01:11**

jear hat geschrieben:Bitte mal kompilieren.

---------------------------
Draußen
---------------------------
Startadresse : 4210776
Länge : -1
---------------------------
OK
---------------------------

PureBoard

Länge einer IncludeBinary bestimmen!