Source language: Translate to:

NB Calendar ?

General questions about NeoBook

Moderator: Neosoft Support

NB Calendar ?

Postby martincalatrava » Thu Jun 19, 2014 6:32 am

How can I have a calendar into my Nb app?

I need a calendar to select date, year, range, etc and put it into a variable.

Is possible?


Thanks for your support
martincalatrava
 
Posts: 68
Joined: Fri Sep 01, 2006 2:18 am
Location: Tres Cantos - Madrid

Re: NB Calendar ?

Postby dec » Thu Jun 19, 2014 7:19 am

Hello,

If you like can take a look at my npCard plugin, which allow you to shown one or more customizable calendars in your publications.

Here you can view some screenshots from the plugin samples:

Image

Image

Image

Image

Image

Image

Image

Image

This last screenshot correspond with the Calendar Dialog publication sample, which you can download from this link.
.
Enhance your NeoBook applications!
.
57 plugins, 1113 actions and 230 samples
.
NeoPlugins website: www.neoplugins.com
.
User avatar
dec
 
Posts: 1663
Joined: Wed Nov 16, 2005 12:48 am
Location: Spain

Re: NB Calendar ?

Postby Neosoft Support » Thu Jun 19, 2014 10:04 am

Not anywhere as advanced or elegant as David's solution above, but NeoBookDBPro has a popup date selector (dbpPopupDateSelector).
NeoSoft Support
Neosoft Support
NeoSoft Team
 
Posts: 5593
Joined: Thu Mar 31, 2005 10:48 pm
Location: Oregon, USA

Re: NB Calendar ?

Postby mishem » Fri Jun 20, 2014 11:20 am

You can create your own calendar with NeoBook.

I do not know, will you run the project?
There tion to Cyrillic.

But if you want, I think will be able to understand.

Looks.

Image


Download.
mishem
 
Posts: 574
Joined: Mon Oct 08, 2012 1:51 pm

Re: NB Calendar ?

Postby mishem » Fri Jun 20, 2014 11:28 am

Yes, I was not looking, just pulled out of the project calendar only code which refers to him.
So there may be extra code and variables.
Tweak for yourself, and you can use it. :)
mishem
 
Posts: 574
Joined: Mon Oct 08, 2012 1:51 pm

Re: NB Calendar ?

Postby Neosoft Support » Sat Jun 21, 2014 9:45 am

Thanks Mishem. Your calendar is pretty neat. The text is in Cyrillic/Russian, but that could be changed.
NeoSoft Support
Neosoft Support
NeoSoft Team
 
Posts: 5593
Joined: Thu Mar 31, 2005 10:48 pm
Location: Oregon, USA

Re: NB Calendar ?

Postby dpayer » Wed Jun 25, 2014 9:50 am

martincalatrava wrote:How can I have a calendar into my Nb app?

I need a calendar to select date, year, range, etc and put it into a variable.

Is possible?


Thanks for your support


Here is a NB function that will allow you to create a popup or inserted calendar into your work.

viewtopic.php?f=22&t=20140

David P.
David Payer
Des Moines, Iowa
USA
User avatar
dpayer
 
Posts: 1380
Joined: Mon Apr 11, 2005 5:55 am
Location: Iowa - USA

Just to share

Postby virger » Thu Jun 26, 2014 10:32 am

From Costa Rica
Pura Vida
The idea to take the previous example.

Code: Select all
NBW Publication Source File
(C)2014 NeoSoft Corp.
Title=CALENDARIO UNIVERSAL
Language=US
NeoBookVer=5,80
ScreenColors=16777216
ScreenWidth=400
ScreenHeight=350
BkndColor=0
ScreenAutoSize=Yes
LinkColor=0
WindowStyle=0
WindowOrder=0
WindowPos=0
WindowProps=29
BiDiMode=0
UseUpdateTimer=Yes
ReturnTime=60
SubroutineAction=:Hoy¶ListBoxGetItem "CmbYear" "1" "[ElYear]"¶ListBoxGetItem "CmbMese" "[MonthNum]" "[ElMes]"¶setvar "[xMes]" "[MonthNum]"¶gosub "Bisiesto"¶Return¶¶¶¶:Bisiesto¶DateToNum "!29/02/[ElYear]" "dd/mm/yyy" "[bisiesto]"¶if "[Bisiesto]" "<>" "Error"¶  setvar "[Cualmes2]" "29"¶else¶  setvar "[Cualmes2]" "28"¶endif¶Return¶¶¶:HaceCale¶setvar "[Mes]" "[CualMes[xMes]]"¶DateToNum "!01/[xMes]/[ElYear]" "dd/mm/yyy" "[Fecha]"¶NumToDate "[Fecha]" "ddd" "[EsDia]"¶NumToDate "[Fecha]" "mmm" "[EsMes]"¶searchstr "[EsDia]" "DomLunMarMiéJueVieSábDom" "[ps]"¶math "(([ps]-1)/3)+1" "" "[DiaInicial]"¶loop "1" "42" "[c]"¶    setvar "[D[c]]" "__"¶endloop¶setvar "[DiaNum]" "1"¶setvar "[Dd]" "[DiaInicial]"¶math "[DayNum]-1+[DiaInicial]" "" "[Pulso]"¶setvar "[vPulso]" "[DiaInicial]"¶setvar "[z]" "0"¶loop "1" "6" "[r]"¶    loop "[DiaInicial]" "7" "[c]"¶        if "[DiaNum]" ">" "9"¶            setvar "[z]" ""¶        endif¶        setvar "[D[Dd]]" "[z][DiaNum]"¶        math "[DiaNum]+1" "" "[DiaNum]"¶        if "[Dd]" "=" "[DayNum]"¶            gosub "MkDia"¶        endif¶        if "[DiaNum]" ">" "[Mes]"¶            gotoline "Fin"¶        endif¶        math "[Dd]+1" "" "[Dd]"¶    endloop¶    setvar "[DiaInicial]" "1"¶endloop¶:Fin¶Return¶¶¶¶:MesMenos¶math "[xMes]" "" "[xMes]"¶math "[xMes]-1" "" "[xMes]"¶setvar "[ElMes]" "[NomMes[xMes]]"¶Return¶¶¶¶:MesMas¶math "[xMes]" "" "[xMes]"¶math "[xMes]+1" "" "[xMes]"¶setvar "[ElMes]" "[NomMes[xMes]]"¶Return¶¶¶¶:fDia¶substr "[HyperLinkClickedText]" "2" "2" "[Pp]"¶math "[Pp]" "" "[Pp]"¶math "[Pp]-1+[vPulso]" "" "[Pulso]"¶fileExists "[PubDir][Pp]_[ElMes]_[ElYear].Txt" "[YN]"¶if "[Yn]" "=" "True"¶    FileRead "[PubDir][Pp]_[ElMes]_[ElYear].Txt" "All" "[Notas]"¶endif¶CustomWindow "Notas" "9" "66" "GrNotas" "DialogBox+Exclusive+NoCloseBtn"¶¶:MkDia¶math "Trunc(([Pulso]-1)/7)" "" "[vPx]"¶ifex "[Pp]=[DayNum] OR [Dd]=[DayNum]"¶    SetObjectFill "RecHoy" "Aqua" "Solid" "False"¶else¶    SetObjectFill "RecHoy" "Yellow" "Solid" "False"¶endif¶.../// math "([Pulso]-([vPx]*7)-1)*50+110" "" "[Px]"¶.../// math "[vPx]*20+205" "" "[Py]"¶math "([Pulso]-([vPx]*7)-1)*50+[mx]" "" "[Px]"¶math "[vPx]*20+[my]" "" "[Py]"¶MoveObject "RecHoy" "[Px]" "[Py]"¶Return
ShapeTransColor=536870912
SplashProps=3
CompileType=0
MediaType=0
FilesIncluded=1
FontsIncluded=2
CopyExternalFiles=No
SetupMedia=3
SetupInstDir=C:\MyProgram
SetupTitle=Setup
SetupColors=16711680|0|65535
Variables=[c]¶[d]¶[D1]¶[d11]¶[d12]¶[d13]¶[d14]¶[d15]¶[d16]¶[d17]¶[D2]¶[d21]¶[d22]¶[d23]¶[d24]¶[d25]¶[d26]¶[d27]¶[D3]¶[d31]¶[d32]¶[d33]¶[d34]¶[d35]¶[d36]¶[d37]¶[D4]¶[D5]¶[D6]¶[D7]¶[r]¶
VersionMajor=1
VersionMinor=0
VersionRelease=0
VersionBuild=0
ReqExLevel=1
CustomFontName=Arial
CustomFontSize=9
CustomFontStyle=0
CustomCharset=1
CacheSize=30
ExtractOp=132
L_OK=OK
L_CANCEL=Cancel
L_YES=Yes
L_NO=No
L_CLOSE=Close
L_ERRORTITLE=Error
L_FINDTITLE=Find
L_FINDPROMPT=Find &What
L_FINDFIRST=&Find First
L_FINDNEXT=Find &Next
L_FINDERROR=Search text not found.
L_PWORDTITLE=Password required
L_PWORDMSG=Before continuing, you must first|enter the correct password.
L_PWORDPROMPT=&Password:
L_PWORDERROR=That's not the right password!
L_MEDIAERROR=In order to play this type of file you must install|the appropriate multimedia hardware and/or|software.
L_INTERNETERROR=Unable to locate Internet Browser software.
L_ABORTFUNCTION=Do you want to cancel this function?
L_EXTRACTERROR=This file could not be extracted and cannot be played.
L_INSTDIRPROMPT=Please enter the drive and directory where you would like this program to be installed. To accept the default drive and directory, simply press Enter.
L_INSTFOLDERPROMPT=Do you wish to create a program folder?
L_INSTRUNPROMPT=Do you want to run
L_INSTDISKPROMPT=Please insert disk #
L_INSTDISKERROR=That's not the correct disk, try again.
L_INSTGENERROR=The installation has terminated.
L_INSTEXITPROMPT=Do you really want to cancel the installation?
L_INSTWINTITLE=Setup
L_INSTPROGTITLE=Extracting Files...
L_SENDEMAIL=Sending Mail...
L_MAILSERVER=Please enter the name of your outgoing email server:
L_COPY=Copy to Clipboard
L_SELECTALL=Select All
L_DONWLOADFILE=Downloading: %s
L_PLEASEWAIT=Please wait...
TrayMenuBegin
MenuName=TrayOpen
MenuText=Open
MenuState=3
MenuKey=0
MenuAction=SetVar "[WindowState]" "Normal"
MenuName=TrayExit
MenuText=Exit
MenuState=3
MenuKey=0
MenuAction=Exit "" ""
MenuEnd
MasterPage
NewPage=New Page
PageStyle=0
PageColor=16777215
PageGradient1=16711680
PageGradient2=255
PageGradientDir=1
WallpaperStyle=0
EffectSpeed=0
PgEnterAction=setvar "[TxMes]" "Enero,Febrero,Marzo,Abril,Mayo,Junio,Julio,Agosto,Setiembre,Octubre,Noviembre,Diciembre"¶StrReplace "[TxMes]" "," "[#13][#10]" "[LosMeses]" ""¶StrParse "[TxMes]" "," "[NomMes]" "[x]"¶setvar "[TxMes]" ""¶strparse "Lunes,Martes,Miercoles,Jueves,Viernes,Sabado,Domingo" "," "[lDia]" "[x]"¶strparse "31.28.31.30.31.30.31.31.30.31.30.31" "." "[CualMes]" "[x]"¶GetObjectInfo "FormCalenda" "Left" "[PiX]"¶GetObjectInfo "FormCalenda" "Top"  "[PiY]"¶math "[PiX]+10" "" "[mx]"¶math "[PiY]+45" "" "[my]"¶ListBoxAddItem "CmbYear" "0" "[year]"¶loop "1950" "[Year]+5" "[yy]"¶    ListBoxAddItem "CmbYear" "0" "[yy]"¶endloop¶gosub "Hoy"¶GoSub "HaceCale"
ObjectType=20
Name=GrNotas
X=435
Y=22
W=375
H=268
Anchor=0
TabOrder=14
GroupBegin
ObjectType=8
Name=Inf
X=0
Y=0
W=375
H=268
Anchor=0
Font=Arial
FontSize=11
FontStyle=3
FontCharset=1
TextColor=0
Text={\rtf1\ansi\deff0\deftab254{\fonttbl{\f0\fnil\fcharset1 Arial;}}{\colortbl\red0\green0\blue0;\red255\green0\blue0;\red0\green128\blue0;\red0\green0\blue255;\red255\green255\blue0;\red255\green0\blue255;\red128\green0\blue128;\red128\green0\blue0;\red0\green255\blue0;\red0\green255\blue255;\red0\green128\blue128;\red0\green0\blue128;\red255\green255\blue255;\red192\green192\blue192;\red128\green128\blue128;\red0\green0\blue0;\red0\green0\blue0;}\paperw12240\paperh15840\margl1440\margr1440\margt1440\margb1440\margh720\margf720{\*\pnseclvl1\pnucrm\pnstart1\pnhang\pnindent720{\pntxtb}{\pntxta{.}}}¶{\*\pnseclvl2\pnucltr\pnstart1\pnhang\pnindent720{\pntxtb}{\pntxta{.}}}¶{\*\pnseclvl3\pndec\pnstart1\pnhang\pnindent720{\pntxtb}{\pntxta{.}}}¶{\*\pnseclvl4\pnlcltr\pnstart1\pnhang\pnindent720{\pntxtb}{\pntxta{)}}}¶{\*\pnseclvl5\pndec\pnstart1\pnhang\pnindent720{\pntxtb{(}}{\pntxta{)}}}¶{\*\pnseclvl6\pnlcltr\pnstart1\pnhang\pnindent720{\pntxtb{(}}{\pntxta{)}}}¶{\*\pnseclvl7\pnlcrm\pnstart1\pnhang\pnindent720{\pntxtb{(}}{\pntxta{)}}}¶{\*\pnseclvl8\pnlcltr\pnstart1\pnhang\pnindent720{\pntxtb{(}}{\pntxta{)}}}¶{\*\pnseclvl9\pndec\pnstart1\pnhang\pnindent720{\pntxtb{(}}{\pntxta{)}}}¶\endnhere\sectdefaultcl{\pard{\ql\li0\fi0\ri0\sb0\sl\sa0 \plain\f0\fs22\cf0\b\i Notas del D\'eda [Pp] De [ElMes] de [ElYear]}}¶}
HMargin=10
VMargin=10
LineColor=0
LineWidth=1
LineStyle=5
FillColor=15658992
FillPattern=0
TabOrder=0
ObjectType=9
Name=EntNotas
X=0
Y=41
W=375
H=195
Anchor=0
VarName=[Notas]
Align=1
EditMultiLine=Yes
EditLen=0
LineColor=0
LineWidth=1
LineStyle=0
FillColor=-16777201
FillPattern=0
Font=Arial
FontSize=11
FontStyle=0
FontCharset=1
TextColor=0
TabOrder=1
ObjectType=3
Name=BtClose
X=355
Y=1
W=19
H=20
Anchor=0
Text=X
Align=2
ImageStyle=0
BevelWidth=1
ObjAction=setvar "[Notas]" ""¶CloseCustomWindow "GrNotas"
LineColor=0
LineWidth=1
LineStyle=0
FillColor=-16777201
FillPattern=0
Font=Arial
FontSize=11
FontStyle=1
FontCharset=1
TextColor=255
TabOrder=2
ObjectType=3
Name=BtSave
X=306
Y=238
W=64
H=26
Anchor=0
Text=Save
Align=2
ImageStyle=0
BevelWidth=1
ObjAction=filewrite "[PubDir][Pp]_[ElMes]_[ElYear].Txt" "All" "[Notas]"
LineColor=0
LineWidth=1
LineStyle=0
FillColor=-16777201
FillPattern=0
Font=Arial
FontSize=11
FontStyle=3
FontCharset=1
TextColor=0
TabOrder=3
GroupEnd
ObjectType=5
Name=Fondo
X=16
Y=130
W=375
H=195
Anchor=0
LineColor=0
LineWidth=1
LineStyle=0
FillColor=15263992
FillPattern=0
TabOrder=2
ObjectType=5
Name=RecHoy
X=31
Y=180
W=30
H=25
Anchor=0
LineColor=255
LineWidth=3
LineStyle=0
FillColor=65535
FillPattern=0
TabOrder=3
ObjectType=7
Name=Line1
X1=20
Y1=178
X2=384
Y2=177
EndCaps=0
LineColor=0
LineWidth=2
LineStyle=0
FillColor=16777215
FillPattern=1
TabOrder=4
ObjectType=8
Name=FormCalenda
X=21
Y=135
W=365
H=185
Anchor=0
Font=Arial
FontSize=12
FontStyle=0
FontCharset=1
TextColor=0
Text={\rtf1\ansi\deff0\deftab254{\fonttbl{\f0\fnil\fcharset1 Arial;}}{\colortbl\red0\green0\blue0;\red255\green0\blue0;\red0\green128\blue0;\red0\green0\blue255;\red255\green255\blue0;\red255\green0\blue255;\red128\green0\blue128;\red128\green0\blue0;\red0\green255\blue0;\red0\green255\blue255;\red0\green128\blue128;\red0\green0\blue128;\red255\green255\blue255;\red192\green192\blue192;\red128\green128\blue128;\red0\green0\blue0;\red0\green0\blue0;}\paperw12240\paperh15840\margl1440\margr1440\margt1440\margb1440\margh720\margf720{\*\pnseclvl1\pnucrm\pnstart1\pnhang\pnindent720{\pntxtb}{\pntxta{.}}}¶{\*\pnseclvl2\pnucltr\pnstart1\pnhang\pnindent720{\pntxtb}{\pntxta{.}}}¶{\*\pnseclvl3\pndec\pnstart1\pnhang\pnindent720{\pntxtb}{\pntxta{.}}}¶{\*\pnseclvl4\pnlcltr\pnstart1\pnhang\pnindent720{\pntxtb}{\pntxta{)}}}¶{\*\pnseclvl5\pndec\pnstart1\pnhang\pnindent720{\pntxtb{(}}{\pntxta{)}}}¶{\*\pnseclvl6\pnlcltr\pnstart1\pnhang\pnindent720{\pntxtb{(}}{\pntxta{)}}}¶{\*\pnseclvl7\pnlcrm\pnstart1\pnhang\pnindent720{\pntxtb{(}}{\pntxta{)}}}¶{\*\pnseclvl8\pnlcltr\pnstart1\pnhang\pnindent720{\pntxtb{(}}{\pntxta{)}}}¶{\*\pnseclvl9\pndec\pnstart1\pnhang\pnindent720{\pntxtb{(}}{\pntxta{)}}}¶\endnhere\sectdefaultcl{\pard{\ql\li0\fi0\ri0\sb0\sl\sa0 \plain\f0\fs24\cf0 Dom\tab Lun\tab \tab Mar\tab \tab Mier\tab \tab Jue\tab \tab Vie\tab \tab Sab\par¶\ql\li0\fi0\ri0\sb0\sl\sa0 \plain\f0\fs24\cf0 \par¶\ql\li0\fi0\ri0\sb0\sl\sa0 \plain\f0\fs24\cf0\uldb [d1]\plain\f0\fs24\cf0\v gosub "fDia"\plain\f0\fs24\cf0 \tab \tab \plain\f0\fs24\cf0\uldb [d2]\plain\f0\fs24\cf0\v gosub "fDia"\plain\f0\fs24\cf0 \tab \tab \plain\f0\fs24\cf0\uldb [d3]\plain\f0\fs24\cf0\v gosub "fDia"\plain\f0\fs24\cf0 \tab \tab \plain\f0\fs24\cf0\uldb [d4]\plain\f0\fs24\cf0\v gosub "fDia"\plain\f0\fs24\cf0 \tab \tab \plain\f0\fs24\cf0\uldb [d5]\plain\f0\fs24\cf0\v gosub "fDia"\plain\f0\fs24\cf0 \tab \tab \plain\f0\fs24\cf0\uldb [d6]\plain\f0\fs24\cf0\v gosub "fDia"\plain\f0\fs24\cf0 \tab \tab \plain\f0\fs24\cf0\uldb [d7]\plain\f0\fs24\cf0\v gosub "fDia"\plain\par¶\ql\li0\fi0\ri0\sb0\sl\sa0 \plain\f0\fs24\cf0\uldb [d8]\plain\f0\fs24\cf0\v gosub "fDia"\plain\f0\fs24\cf0 \tab \tab \plain\f0\fs24\cf0\uldb [d9]\plain\f0\fs24\cf0\v gosub "fDia"\plain\f0\fs24\cf0 \tab \tab \plain\f0\fs24\cf0\uldb [d10]\plain\f0\fs24\cf0\v GoSub "fDia"\plain\f0\fs24\cf0 \tab \tab \plain\f0\fs24\cf0\uldb [d11]\plain\f0\fs24\cf0\v GoSub "fDia"\plain\f0\fs24\cf0 \tab \tab \plain\f0\fs24\cf0\uldb [d12]\plain\f0\fs24\cf0\v GoSub "fDia"\plain\f0\fs24\cf0 \tab \tab \plain\f0\fs24\cf0\uldb [d13]\plain\f0\fs24\cf0\v GoSub "fDia"\plain\f0\fs24\cf0 \tab \tab \plain\f0\fs24\cf0\uldb [d14]\plain\f0\fs24\cf0\v GoSub "fDia"\plain\par¶\ql\li0\fi0\ri0\sb0\sl\sa0 \plain\f0\fs24\cf0\uldb [d15]\plain\f0\fs24\cf0\v GoSub "fDia"\plain\f0\fs24\cf0 \tab \tab \plain\f0\fs24\cf0\uldb [d16]\plain\f0\fs24\cf0\v GoSub "fDia"\plain\f0\fs24\cf0 \tab \tab \plain\f0\fs24\cf0\uldb [d17]\plain\f0\fs24\cf0\v GoSub "fDia"\plain\f0\fs24\cf0 \tab \tab \plain\f0\fs24\cf0\uldb [d18]\plain\f0\fs24\cf0\v gosub "fDia"\plain\f0\fs24\cf0 \tab \tab \plain\f0\fs24\cf0\uldb [d19]\plain\f0\fs24\cf0\v GoSub "fDia"\plain\f0\fs24\cf0 \tab \tab \plain\f0\fs24\cf0\uldb [d20]\plain\f0\fs24\cf0\v GoSub "fDia"\plain\f0\fs24\cf0 \tab \tab \plain\f0\fs24\cf0\uldb [d21]\plain\f0\fs24\cf0\v GoSub "fDia"\plain\par¶\ql\li0\fi0\ri0\sb0\sl\sa0 \plain\f0\fs24\cf0\uldb [d22]\plain\f0\fs24\cf0\v GoSub "fDia"\plain\f0\fs24\cf0 \tab \tab \plain\f0\fs24\cf0\uldb [d23]\plain\f0\fs24\cf0\v GoSub "fDia"\plain\f0\fs24\cf0 \tab \tab \plain\f0\fs24\cf0\uldb [d24]\plain\f0\fs24\cf0\v GoSub "fDia"\plain\f0\fs24\cf0 \tab \tab \plain\f0\fs24\cf0\uldb [d25]\plain\f0\fs24\cf0\v GoSub "fDia"\plain\f0\fs24\cf0 \tab \tab \plain\f0\fs24\cf0\uldb [d26]\plain\f0\fs24\cf0\v GoSub "fDia"\plain\f0\fs24\cf0 \tab \tab \plain\f0\fs24\cf0\uldb [d27]\plain\f0\fs24\cf0\v GoSub "fDia"\plain\f0\fs24\cf0 \tab \tab \plain\f0\fs24\cf0\uldb [d28]\plain\f0\fs24\cf0\v GoSub "fDia"\plain\par¶\ql\li0\fi0\ri0\sb0\sl\sa0 \plain\f0\fs24\cf0\uldb [d29]\plain\f0\fs24\cf0\v GoSub "fDia"\plain\f0\fs24\cf0 \tab \tab \plain\f0\fs24\cf0\uldb [d30]\plain\f0\fs24\cf0\v gosub "fDia"\plain\f0\fs24\cf0 \tab \tab \plain\f0\fs24\cf0\uldb [d31]\plain\f0\fs24\cf0\v GoSub "fDia"\plain\f0\fs24\cf0 \tab \tab \plain\f0\fs24\cf0\uldb [d32]\plain\f0\fs24\cf0\v GoSub "fDia"\plain\f0\fs24\cf0 \tab \tab \plain\f0\fs24\cf0\uldb [d33]\plain\f0\fs24\cf0\v GoSub "fDia"\plain\f0\fs24\cf0 \tab \tab \plain\f0\fs24\cf0\uldb [d34]\plain\f0\fs24\cf0\v GoSub "fDia"\plain\f0\fs24\cf0 \tab \tab [d35]\par¶\ql\li0\fi0\ri0\sb0\sl\sa0 \plain\f0\fs24\cf0\uldb [d36]\plain\f0\fs24\cf0\v GoSub "fDia"\plain\f0\fs24\cf0 \tab \tab \plain\f0\fs24\cf0\uldb [d37]\plain\f0\fs24\cf0\v GoSub "fDia"\plain\f0\fs24\cf0 \tab \tab \plain\f0\fs24\cf0\uldb [d38]\plain\f0\fs24\cf0\v GoSub "fDia"\plain\f0\fs24\cf0 \tab \tab \plain\f0\fs24\cf0\uldb [d39]\plain\f0\fs24\cf0\v gosub "fDia"\plain\f0\fs24\cf0 \tab \tab \plain\f0\fs24\cf0\uldb [d40]\plain\f0\fs24\cf0\v GoSub "fDia"\plain\f0\fs24\cf0 \tab \tab \plain\f0\fs24\cf0\uldb [d41]\plain\f0\fs24\cf0\v GoSub "fDia"\plain\f0\fs24\cf0 \tab \tab \plain\f0\fs24\cf0\uldb [d42]\plain\f0\fs24\cf0\v gosub "fDia"\plain\f0\fs24\cf0 \tab \tab \par¶\ql\li0\fi0\ri0\sb0\sl\sa0 \plain\f0\fs24\cf0 }}¶}
HMargin=10
VMargin=10
LineColor=0
LineWidth=2
LineStyle=0
FillColor=16777215
FillPattern=1
TabOrder=5
ObjectType=11
Name=CmbMese
X=141
Y=34
W=123
H=25
Anchor=0
Text=[LosMeses]
VarName=[ElMes]
VarType=0
ObjAction=ListBoxFindItem "CmbMese" "[ElMes]" "[xMes]"¶if "[vMes]" "=" ""¶    DefineVar "[vMes]" "Date" "dd/mm/yyy" "Global" "01/[xMes]/[ElYear]"¶else¶    setVar "[vMes]" "01/[xMes]/[ElYear]"¶endif¶setvar "[ElMes]" "[NomMes[xMes]]"¶GoSub "HaceCale"
LineColor=0
LineWidth=1
LineStyle=0
FillColor=-16777201
FillPattern=0
Font=Arial
FontSize=11
FontStyle=0
FontCharset=1
TextColor=0
TabOrder=6
ObjectType=11
Name=CmbYear
X=169
Y=6
W=66
H=25
Anchor=0
Text=[LosYears]
VarName=[ElYear]
VarType=0
ObjAction=if "[vMes]" "=" ""¶    DefineVar "[vMes]" "Date" "dd/mm/yyy" "Global" "01/[xMes]/[ElYear]"¶else¶    setVar "[vMes]" "01/[xMes]/[ElYear]"¶endif¶GoSub "Bisiesto"¶GoSub "HaceCale"
LineColor=0
LineWidth=1
LineStyle=0
FillColor=-16777201
FillPattern=0
Font=Arial
FontSize=11
FontStyle=0
FontCharset=1
TextColor=0
TabOrder=7
ObjectType=8
Name=InfYyMm
X=127
Y=65
W=150
H=57
Anchor=0
Font=Arial
FontSize=16
FontStyle=3
FontCharset=1
TextColor=0
Text={\rtf1\ansi\deff0\deftab254{\fonttbl{\f0\fnil\fcharset1 Arial;}}{\colortbl\red0\green0\blue0;\red255\green0\blue0;\red0\green128\blue0;\red0\green0\blue255;\red255\green255\blue0;\red255\green0\blue255;\red128\green0\blue128;\red128\green0\blue0;\red0\green255\blue0;\red0\green255\blue255;\red0\green128\blue128;\red0\green0\blue128;\red255\green255\blue255;\red192\green192\blue192;\red128\green128\blue128;\red0\green0\blue0;\red0\green0\blue0;}\paperw12240\paperh15840\margl1440\margr1440\margt1440\margb1440\margh720\margf720{\*\pnseclvl1\pnucrm\pnstart1\pnhang\pnindent720{\pntxtb}{\pntxta{.}}}¶{\*\pnseclvl2\pnucltr\pnstart1\pnhang\pnindent720{\pntxtb}{\pntxta{.}}}¶{\*\pnseclvl3\pndec\pnstart1\pnhang\pnindent720{\pntxtb}{\pntxta{.}}}¶{\*\pnseclvl4\pnlcltr\pnstart1\pnhang\pnindent720{\pntxtb}{\pntxta{)}}}¶{\*\pnseclvl5\pndec\pnstart1\pnhang\pnindent720{\pntxtb{(}}{\pntxta{)}}}¶{\*\pnseclvl6\pnlcltr\pnstart1\pnhang\pnindent720{\pntxtb{(}}{\pntxta{)}}}¶{\*\pnseclvl7\pnlcrm\pnstart1\pnhang\pnindent720{\pntxtb{(}}{\pntxta{)}}}¶{\*\pnseclvl8\pnlcltr\pnstart1\pnhang\pnindent720{\pntxtb{(}}{\pntxta{)}}}¶{\*\pnseclvl9\pndec\pnstart1\pnhang\pnindent720{\pntxtb{(}}{\pntxta{)}}}¶\endnhere\sectdefaultcl{\pard{\qc\li0\fi0\ri0\sb0\sl\sa0 \plain\f0\fs32\cf0\b\i [ElYear]\par¶\qc\li0\fi0\ri0\sb0\sl\sa0 \plain\f0\fs32\cf0\b\i [ElMes]}}¶}
HMargin=0
VMargin=0
LineColor=0
LineWidth=1
LineStyle=0
FillColor=16250871
FillPattern=0
TabOrder=8
ObjectType=3
Name=BtMasMes
X=276
Y=106
W=14
H=16
Anchor=0
Text=5
Align=2
ImageStyle=0
BevelWidth=1
ObjAction=gosub "MesMas"¶GoSub "HaceCale"
LineColor=0
LineWidth=1
LineStyle=0
FillColor=-16777201
FillPattern=0
Font=Marlett
FontSize=10
FontStyle=1
FontCharset=2
TextColor=0
TabOrder=11
ObjectType=3
Name=BtMenosMes
X=114
Y=106
W=14
H=16
Anchor=0
Text=6
Align=2
ImageStyle=0
BevelWidth=1
ObjAction=gosub "MesMenos"¶GoSub "HaceCale"
LineColor=0
LineWidth=1
LineStyle=0
FillColor=-16777201
FillPattern=0
Font=Marlett
FontSize=10
FontStyle=1
FontCharset=2
TextColor=0
TabOrder=12
ObjectType=3
Name=BtMasYr
X=276
Y=65
W=16
H=18
Anchor=0
Text=4
Align=2
ImageStyle=0
BevelWidth=1
ObjAction=math "[ElYear]+1" "" "[ElYear]"¶gosub "Bisiesto"¶GoSub "HaceCale"
LineColor=0
LineWidth=1
LineStyle=0
FillColor=-16777201
FillPattern=0
Font=Marlett
FontSize=11
FontStyle=1
FontCharset=2
TextColor=0
TabOrder=9
ObjectType=3
Name=BtMenosYr
X=112
Y=65
W=16
H=18
Anchor=0
Text=3
Align=2
ImageStyle=0
BevelWidth=1
ObjAction=math "[ElYear]-1" "" "[ElYear]"¶gosub "Bisiesto"¶GoSub "HaceCale"
LineColor=0
LineWidth=1
LineStyle=0
FillColor=-16777201
FillPattern=0
Font=Marlett
FontSize=11
FontStyle=1
FontCharset=2
TextColor=0
TabOrder=10
ObjectType=3
Name=BtHoy
X=331
Y=98
W=58
H=23
Anchor=0
Text=Hoy
Align=2
ImageStyle=0
ObjAction=gosub "Hoy"¶GoSub "HaceCale"
LineColor=0
LineWidth=1
LineStyle=0
FillColor=15987699
FillPattern=0
Font=Arial
FontSize=12
FontStyle=0
FontCharset=1
TextColor=0
TabOrder=13


The following is Greece
Costa Rica in World Cup
COSTA RICA
PURA VIDA
User avatar
virger
 
Posts: 510
Joined: Mon Sep 18, 2006 12:21 pm
Location: Costa Rica, America Central

Re: NB Calendar ?

Postby Neosoft Support » Fri Jun 27, 2014 9:58 am

Lots of options. Thank you.
NeoSoft Support
Neosoft Support
NeoSoft Team
 
Posts: 5593
Joined: Thu Mar 31, 2005 10:48 pm
Location: Oregon, USA

Re: NB Calendar ?

Postby ecueto » Thu Jul 03, 2014 12:27 pm

Nothing can compare with David NpCard solution.
But Mishen permission, I miss her schedule translation to Spanish.
As you can upload the link.

E.Cueto

http://rghost.net/8pSFkK7vZ

*Rghost no mantiene mucho tiempo los archivos. sorry
ecueto
 
Posts: 26
Joined: Sat Jun 07, 2014 12:04 am


Return to General NeoBook Discussions

Who is online

Users browsing this forum: No registered users and 1 guest