PureBoard

Hallo zusammen,
ich suche einen source code, der outlook termine monatsweise oder einzeln ausliest, schreibt und löscht. dieses beispiel funktioniert leider nicht. hat irgend jemand funktionierende beispiele?
vielen dank im voraus

MINIPLOT module (pbi):


XIncludeFile "MINIBGI.pbi"

DeclareModule MINIPLOT
EnableExplicit

#MAXINTEGER = 65535



; sets clipping of plotting on: i.e. only within actual plot region
; delimited by XMin->XMax And YMin->YMax
Declare SetClipOn()

; sets clipping of plotting off: i.e. can plot ...

MINIBGI module (pbi):


DeclareModule MINIBGI
EnableExplicit

; update constants
#UpdateOff = 0
#UpdateOn = 1
#UpdateNow = 2
; clipping constants
#ClipOn = 1
#ClipOff = 0
; raster operation constants
#CopyPut = 0
#XorPut = 1
#OrPut = 2
#AndPut = 3
#NotPut = 4
#NotOrPut = 5 ...

nach einigen versuchen funtioniert bgi und ein plotter jetzt. vielleicht hat jemand interesse daran.

testprog.:


XIncludeFile "MINIPLOT.pbi"
XIncludeFile "MINIBGI.pbi"

UseModule MINIPLOT
UseModule MINIBGI
EnableExplicit

Procedure.d sinc(x.d)
If x=0.0
ProcedureReturn 1.0
Else ...

habe das jetzt verifiziert. die farbwerte sind in ordnung, dass ist also leider nicht der fehler.

ein paar farben aus einem forum:


#AcidGreen = $1ABFB0; RGB (176, 191, 26)
#Aero = $E8B97C; RGB (124, 185, 232)
#AeroBlue = $E5FFC9; RGB (201, 255, 229)
#AfricanViolet = $BE84B2; RGB (178, 132, 190)
#AirForceBlue_RAF = $A88A5D; RGB (93, 138, 168)
#AirForceBlue_USAF = $8F3000; RGB (0, 48, 143 ...

test proggie


XIncludeFile "bgi.pb"


UseModule BGI
x.i = #VividRedTangelo

EnableExplicit

Global Event.i, Quit.i, wnum.i,MaxX.i,MaxY.i,MaxRadius.i
wnum = OpenWindow(#PB_Any, 100, 200, 600, 600, "PureBasic Window", #PB_Window_SystemMenu | #PB_Window_MinimizeGadget | #PB_Window_MaximizeGadget ...

part 2

Module BGI
EnableExplicit


Structure COLORTABLE
*colTable.RGBQUAD[0]
EndStructure

Structure Ltype1
StructureUnion
L.l
W1.w
W2.w
B1.b
B2.b
B3.b
B4.b
EndStructureUnion
EndStructure

#NrVideoPages = 4; ;number OF available video pages
#Rad = #PI/180.0
#NrMaxFonts = 15
#MinCharSize ...

Hi,
Als anfänger versuche ich ein bgi graph modul zu programmieren. Es scheint auch zu funktionieren bis auf die farben. Kann mir irgendjemand sagen warum ich falsche farben bekomme?.
Danke im voraus.

hier das modul part 1


DeclareModule BGI
EnableExplicit

; error codes
#grOK = 0 ...