Hi all,
How can I change a Color Palette for saving and loading (the same for both)
bitmap for identical result?
Help me, plaese...
Dne út 2. říjen 2001 12:05 jste napsal(a):
> Hello All
> I have problems with simple example (at end of message).
> I am using Microsoft Fortran Power station 4.0
> I compiled it in msdos prompt with fl32 and /MW option. The
> loaded colors is diferent than saved :-( (try it or I can send picture
> with my result to your home adress) Where is problem?
Example:
use msflib
integer (2) status
integer ic(8)
data ic/#FF0000,#00FF00,#0000FF,#FFFFFF,#000000,#00FFFF,#FF00FF,#FFFF00/
ires=setbkcolor(15)
call clearscreen($gclearscreen)
do i=1,8
ix=i*50
ires=setcolorrgb(ic(i))
status=ellipse($gfillinterior,int2(40+ix),int2(55),int2(70+ix),int2(85))
ires=saveimage('image',39+ix,54,71+ix,86)
ires=loadimage('image',39+ix,90)
enddo
end
--
Pavel Houdek
Student of Czech Technical University in Prague
Faculty of Mechanical Engineering
Department of Process Engineering U 218
[log in to unmask]
[log in to unmask]
|