RE: NoWhiteLine
- To: mathgroup at smc.vnet.net
- Subject: [mg26084] RE: NoWhiteLine
- From: "pascal.baes" <pascal.baes at skynet.be>
- Date: Tue, 28 Nov 2000 01:55:30 -0500 (EST)
- Sender: owner-wri-mathgroup at wolfram.com
>Date: Wed, 22 Nov 2000 15:52:53 +0100 >To: mathgroup at smc.vnet.net >From: "pascal.baes" <pascal.baes at skynet.be> To: mathgroup at smc.vnet.net >Subject: [mg26084] NoWhiteLine >Cc: >Bcc: >X-Attachments: > >I now, i'm little bite stupid some time, but,I don't want white line >around Graphics! (if you look Graphics[...,Background->RGB[0,0,0]] >on black Background Notebook,Some time on rigth, some time under, >uncontrolable white line apear! >(I tryed: ,Background->RGBColor[0,0,0],Frame->True,FrameTicks->None, >FrameStyle->{RGBColor[0,0,0],AbsoluteThickness[10]}... >Still white line... >some exemple of my code? > >txt="I don't want white line around Graphics!"; > >readText1[txt_String,n_Integer]:= > Table[StringTake[ > StringJoin[ Table[".",{n}]]<>txt<>StringJoin[ Table[".",{n}]], {k, > k+n-1}] ,{k,1,StringLength[txt]+n+1}]; > >l=35;Table[ > Show[Graphics[ > Text[StyleForm[readText1[tt,l][[k]] ,FontColor->RGBColor[1,1,1]], > {0, 0}]],Background->RGBColor[0,0,0],Frame->True, > FrameTicks->None, > FrameStyle->{RGBColor[0,0,0],AbsoluteThickness[30]}, > PlotRange->{{-10,10},{-10,10}},ImageSize->{500,50}],{k,1, > StringLength[tt]+l+1}]; > >Look on black Bacground Notebook, or export in QuickTime,You while >see that thin white line it make me disapointed... >other solution than black scotch tape on my screen? Yes, I got solution one minute after send Question...: Make CellsMargin More Big From OptionInspector