Formatted text in Access

Questions about our Advanced Database plug-in

Moderator: Neosoft Support

Locked
User avatar
AsleyCruz
Posts: 113
Joined: Fri Sep 16, 2011 2:12 pm

Formatted text in Access

Post by AsleyCruz »

Hi guys,
Can NeoBookDBPro read formatted text (rich text field)?

I'm trying but see the results on the picture.
Hope find any solution or idea... best regards and thanks 8)


Image
AsleyCruz
Freelancer - Graphic & Type Designer

FREE NEOBOOK APPS: See Website

.
User avatar
virger
Posts: 540
Joined: Mon Sep 18, 2006 12:21 pm
Location: Costa Rica, America Central

Re: Formatted text in Access

Post by virger »

Maybe this can help you.

Code: Select all

NBW Publication Source File
(C)2016 NeoSoft Corp.
Title='RICH TEXT' MANAGER
Author=GdoSan/April-2017
Language=US
NeoBookVer=5,80
ScreenColors=16777216
ScreenWidth=640
ScreenHeight=480
BkndColor=0
ScreenAutoSize=Yes
LinkColor=16711680
WindowStyle=0
WindowOrder=0
WindowPos=0
WindowProps=31
BiDiMode=0
UseUpdateTimer=Yes
ReturnTime=60
SubroutineAction=:ReadRich¶filewrite "tmp.rtf" "All" "[rich.data.rich]"¶refreshobject "ElRich"
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=[DelResult]¶[rich.data.info]¶[rich.data.rich]¶[texto]¶[Tx]¶
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
ObjectType=3
Name=BtCreateBase
X=8
Y=11
W=243
H=24
Anchor=0
Text=Create/Open DataBase
Align=2
ImageStyle=0
ObjAction=fileexists "[PubDir]tmp.rtf" "[yn]"¶if "[yn]" "=" "True"¶    fileerase "[PubDir]tmp.rtf"¶endif¶¶dbpCreateAccessDatabase "[PubDir]richtext.mdb" "Password=;Encrypted=No"¶dbpOpenDatabase "rich" "[PubDir]richtext.mdb"¶¶dbpCreateTable "rich" "data" "info String(35);rich Memo"¶dbpOpenTable "rich" "data" "ReadRich"¶...dbpEmptyTable "rich" "data"¶¶loop "1" "3" "[c]"¶    fileread "[PubDir]paja[c].rtf" "All" "[Tx]"¶¶    dbpAddRecord "rich" "data"¶    setvar "[rich.data.rich]" "[tx]"¶    setvar "[rich.data.info]" "This is a Example 'paja[c].rtf'"¶    dbpSaveEdits "rich" "data"¶¶endloop¶¶dbpSetColumnOrder "rich" "data" "info"¶dbpShowGrid "rich" "data" "show"
LineColor=0
LineWidth=1
LineStyle=0
FillColor=12632256
FillPattern=0
Font=Arial
FontSize=10
FontStyle=0
FontCharset=1
TextColor=0
TabOrder=5
ObjectType=8
Name=Inf1
X=279
Y=9
W=50
H=16
Anchor=0
Font=Arial
FontSize=12
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{\qr\li0\fi0\ri0\sb0\sl\sa0 \plain\f0\fs24\cf0\b\i Info:}}¶}
HMargin=0
VMargin=0
LineColor=0
LineWidth=0
LineStyle=0
FillColor=12632256
FillPattern=1
TabOrder=1
ObjectType=9
Name=info
X=333
Y=3
W=300
H=24
Anchor=0
VarName=[rich.data.info]
Align=1
EditLen=35
LineColor=0
LineWidth=1
LineStyle=0
FillColor=14219512
FillPattern=0
Font=Arial
FontSize=9
FontStyle=0
FontCharset=1
TextColor=0
TabOrder=2
ObjectType=8
Name=Inf2
X=283
Y=37
W=46
H=16
Anchor=0
Font=Arial
FontSize=12
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{\qr\li0\fi0\ri0\sb0\sl\sa0 \plain\f0\fs24\cf0\b\i Rich:}}¶}
HMargin=0
VMargin=0
LineColor=0
LineWidth=0
LineStyle=0
FillColor=12632256
FillPattern=1
TabOrder=0
ObjectType=3
Name=BtF
X=334
Y=60
W=46
H=24
Anchor=0
Text=First
Align=2
ImageStyle=0
ObjAction=dbpFirst "rich" "data"
LineColor=0
LineWidth=1
LineStyle=0
FillColor=45857723
FillPattern=0
Font=Arial
FontSize=9
FontStyle=0
FontCharset=1
TextColor=33751811
TabOrder=6
ObjectType=3
Name=BtP
X=334
Y=92
W=46
H=24
Anchor=0
Text=Prev
Align=2
ImageStyle=0
ObjAction=dbpPrev "rich" "data"
LineColor=0
LineWidth=1
LineStyle=0
FillColor=45857723
FillPattern=0
Font=Arial
FontSize=9
FontStyle=0
FontCharset=1
TextColor=33751811
TabOrder=7
ObjectType=3
Name=BtN
X=334
Y=124
W=46
H=24
Anchor=0
Text=Next
Align=2
ImageStyle=0
ObjAction=dbpNext "rich" "data"
LineColor=0
LineWidth=1
LineStyle=0
FillColor=45857723
FillPattern=0
Font=Arial
FontSize=9
FontStyle=0
FontCharset=1
TextColor=33751811
TabOrder=8
ObjectType=3
Name=BtL
X=390
Y=76
W=46
H=24
Anchor=0
Text=Last
Align=2
ImageStyle=0
ObjAction=dbpLast "rich" "data"
LineColor=0
LineWidth=1
LineStyle=0
FillColor=45857723
FillPattern=0
Font=Arial
FontSize=9
FontStyle=0
FontCharset=1
TextColor=33751811
TabOrder=9
ObjectType=3
Name=BtD
X=390
Y=108
W=46
H=24
Anchor=0
Text=Delete
Align=2
ImageStyle=0
ObjAction=MessageBox "Delete" "Delete record?" "OK|Cancel" "[DelResult]"¶If "[DelResult]" "=" "1"¶  dbpDeleteRecord "rich" "data"¶EndIf
LineColor=0
LineWidth=1
LineStyle=0
FillColor=45857723
FillPattern=0
Font=Arial
FontSize=9
FontStyle=0
FontCharset=1
TextColor=33751811
TabOrder=10
ObjectType=5
Name=show
X=1
Y=104
W=300
H=127
Anchor=0
LineColor=0
LineWidth=1
LineStyle=0
FillColor=13687032
FillPattern=0
TabOrder=11
ObjectType=2
Name=ElRich
X=0
Y=236
W=640
H=244
Anchor=2
FileName=[PubDir]tmp.rtf
LineColor=0
LineWidth=1
LineStyle=0
FillColor=14219504
FillPattern=0
Font=Arial
FontSize=10
FontStyle=0
FontCharset=1
TextColor=0
TabOrder=12
ObjectType=9
Name=EnNfile
X=333
Y=33
W=300
H=24
Anchor=0
VarName=[nFile]
Align=1
EditLen=0
LineColor=0
LineWidth=1
LineStyle=0
FillColor=14219512
FillPattern=0
Font=Arial
FontSize=9
FontStyle=0
FontCharset=1
TextColor=0
TabOrder=13
ObjectType=3
Name=BtFile
X=500
Y=61
W=63
H=24
Anchor=0
Text=File
Align=2
ImageStyle=0
ObjAction=FileOpenBox "FILE 'RICH-TEXT'" "Any File|*.rtf" "" "[nFile]" ""¶if "[nFile]" "<>" ""¶    enableobject "BtAdd"¶else¶    disableobject "BtAdd"¶endif
LineColor=0
LineWidth=1
LineStyle=0
FillColor=45857723
FillPattern=0
Font=Arial
FontSize=9
FontStyle=0
FontCharset=1
TextColor=33751811
TabOrder=14
ObjectType=3
Name=BtAdd
X=574
Y=61
W=60
H=24
Anchor=0
Text=Add
Align=2
ImageStyle=0
ObjAction=fileread "[nFile]" "All" "[Tx]"¶¶ExtractFileName "[nFile]" "[fName]"¶¶dbpAddRecord "rich" "data"¶setvar "[rich.data.rich]" "[tx]"¶setvar "[rich.data.info]" "This is a Example '[fName]'"¶dbpSaveEdits "rich" "data"¶¶dbpShowGrid "rich" "data" "show"
LineColor=0
LineWidth=1
LineStyle=0
FillColor=45857723
FillPattern=0
Font=Arial
FontSize=9
FontStyle=0
FontCharset=1
TextColor=33751811
Enabled=No
TabOrder=15
ObjectType=3
Name=BtQuit
X=542
Y=194
W=84
H=24
Anchor=0
Text=Quit
Align=2
ImageStyle=0
ObjAction=fileerase "[PubDir]tmp.rtf"¶dbpCloseDatabase "rich"¶Exit "FROM COSTA RICA" "PURA VIDA"
LineColor=0
LineWidth=1
LineStyle=0
FillColor=12632256
FillPattern=0
Font=Arial
FontSize=10
FontStyle=0
FontCharset=1
TextColor=0
TabOrder=16
ENJOY
COSTA RICA
PURA VIDA
User avatar
AsleyCruz
Posts: 113
Joined: Fri Sep 16, 2011 2:12 pm

Re: Formatted text in Access

Post by AsleyCruz »

Many thanks for the sample virger :)
works like a charm but I can't use any dbpQuery action
in rtf files to search some text.

Could it be possible auto height with this lugin?
Thanks for everything!
AsleyCruz
Freelancer - Graphic & Type Designer

FREE NEOBOOK APPS: See Website

.
User avatar
virger
Posts: 540
Joined: Mon Sep 18, 2006 12:21 pm
Location: Costa Rica, America Central

Re: Formatted text in Access

Post by virger »

Try this button

Code: Select all

{NeoBook 5 Objects}
NeoBookVer=5,80
ObjectType=3
Name=BtSearch
X=391
Y=176
W=100
H=25
Anchor=0
Text=Search
Align=2
ImageStyle=0
ObjAction=dbpQuery "rich" "data" "rich like [#34]%MY_DATA_TO_SEARCH%[#34]"
LineColor=0
LineWidth=1
LineStyle=0
FillColor=12632256
FillPattern=0
Font=Arial
FontSize=10
FontStyle=0
FontCharset=1
TextColor=0
TabOrder=17
COSTA RICA
PURA VIDA
Locked