| |
| |
|
 | Bitmapgröße detect - for this example is the File.Pcu and XProfan9 necessary. The values go as String X,Y zurückgegeben and can by z.B. substr  voneinander separated go.:
CompileMarkSeparation
proc getBmpSizeByHeader
parameters fle$
declare fh&,tmem#,mem$
clear mem$
fh&=fopen(fle$,b)
if fh&
mem$=fgets(fh&,54)
fclose fh&
if mid$(mem$,1,2)==BM
dim tmem#,54
clear tmem#
tmem#=addr(mem$)
mem$=str$(long(tmem#,18))+,+str$(long(tmem#,22))
dispose tmem#
endif
endif
return mem$
endproc
|
|
| |
| |
| |
|
|
| | Include for further Dateiformate: [...] |
|
| |
| |
| |
|
(1.920)
Deutsch
English
Français
Español
Italia