Hot Topic (More than 10 Replies) Printstring Problem (Read 2672 times)
Amor
Full Member
Members
***
Offline


No personal text

Posts: 366
Location: Germany
Joined: Feb 7th, 2004
Printstring Problem
Oct 12th, 2010 at 3:19pm
Print Post Print Post  
Hello!
If use Printstring to print my documents, but my Logo print begins to deep from the Top of the Page Start  approx. 4 cm
How do I influencing to print my logo 1cm e.g.

thank you for your help.
« Last Edit: Oct 15th, 2010 at 8:56pm by Hammer »  

Dr. med. Amor Belhareth&&Medizin Labor &&Germany
Back to top
 
IP Logged
 
Ray the Reaper
Global Moderator
Members
Lantica Support
*****
Offline


The One & The Only

Posts: 2482
Joined: Aug 20th, 2003
Re: Prinstring Problem
Reply #1 - Oct 12th, 2010 at 4:19pm
Print Post Print Post  
Hello Amor,

Can you post the PrintImage() line of programming that prints your logo?

-Ray
  

Raymond Yoxall Consulting
ray.yoxall@gmail.com
ryoxall@lantica.com
Sesame Applications, Design and Support
Back to top
IP Logged
 
Amor
Full Member
Members
***
Offline


No personal text

Posts: 366
Location: Germany
Joined: Feb 7th, 2004
Re: Prinstring Problem
Reply #2 - Oct 12th, 2010 at 4:28pm
Print Post Print Post  
Hello Ray-

Hier ist the Code


if @GlobalValue (vSignatureOnDoktorPrintString) = "1" then
     {
     PrintImage(".\pics\BEFUNDKOPF.JPG", 0, 0, -1, -1)
       ..
  

Dr. med. Amor Belhareth&&Medizin Labor &&Germany
Back to top
 
IP Logged
 
Ray the Reaper
Global Moderator
Members
Lantica Support
*****
Offline


The One & The Only

Posts: 2482
Joined: Aug 20th, 2003
Re: Prinstring Problem
Reply #3 - Oct 12th, 2010 at 6:41pm
Print Post Print Post  
Hello Amor,

Are you using PrintPageMargin() anywhere in your programming?

-Ray
  

Raymond Yoxall Consulting
ray.yoxall@gmail.com
ryoxall@lantica.com
Sesame Applications, Design and Support
Back to top
IP Logged
 
Amor
Full Member
Members
***
Offline


No personal text

Posts: 366
Location: Germany
Joined: Feb 7th, 2004
Re: Prinstring Problem
Reply #4 - Oct 12th, 2010 at 7:36pm
Print Post Print Post  
YES REY!

Subroutine MyNewPage()
var vFont as String = " Arial"
var vFontSize as Int = 12

   NewDocument(1)
  //NewPage(850, 1100)      
  NewPage (827, 1169)
  PrintPagePaper (5)
  PrintPageMargin(72, 72, 72, 72)
 
End Subroutine
  

Dr. med. Amor Belhareth&&Medizin Labor &&Germany
Back to top
 
IP Logged
 
Ray the Reaper
Global Moderator
Members
Lantica Support
*****
Offline


The One & The Only

Posts: 2482
Joined: Aug 20th, 2003
Re: Prinstring Problem
Reply #5 - Oct 12th, 2010 at 8:12pm
Print Post Print Post  
Try changing the PrintPageMargin line to the following

Code
Select All
PrintPageMargin(72, 36, 72, 72)  



-Ray
  

Raymond Yoxall Consulting
ray.yoxall@gmail.com
ryoxall@lantica.com
Sesame Applications, Design and Support
Back to top
IP Logged
 
Amor
Full Member
Members
***
Offline


No personal text

Posts: 366
Location: Germany
Joined: Feb 7th, 2004
Re: Prinstring Problem
Reply #6 - Oct 15th, 2010 at 4:21pm
Print Post Print Post  
Thank you Ray.
  

Dr. med. Amor Belhareth&&Medizin Labor &&Germany
Back to top
 
IP Logged
 
Amor
Full Member
Members
***
Offline


No personal text

Posts: 366
Location: Germany
Joined: Feb 7th, 2004
Re: Prinstring Problem
Reply #7 - Oct 15th, 2010 at 4:27pm
Print Post Print Post  
Hello!
Please how toget the Blue Box?


      PrintRGBColor (15,56,130) // Blue Color
     
       Printstring ("Facharzt für Mikrobiologie, Virologie und Infektionsepidemiologie", 0, @PageExtentY()+10 , 0, vFont, 14, 0)
     PrintString ("MDL Dr. Belhareth. Am Pferdemarkt 4a . 26003 Aurich", 10, @PageExtentY()+30, 0, vFont, 14, 0)
     PrintBox (Box_Type_Flat_Box, 10, @PageExtentY ( ), @PageExtentX( ), 1)
     
       PrintBox(32, 0, 480, 850, 800)   ---- > i get a gray Box ?

     PrintRGBColor (1, 0, 0)

Thank you for the help.

Dr. Belhareth
  

Dr. med. Amor Belhareth&&Medizin Labor &&Germany
Back to top
 
IP Logged
 
Amor
Full Member
Members
***
Offline


No personal text

Posts: 366
Location: Germany
Joined: Feb 7th, 2004
Re: Prinstring Problem
Reply #8 - Oct 15th, 2010 at 4:36pm
Print Post Print Post  
Hello!
Anther Question:
i want a title centered and underlined how do you please?
this das not work:

PrintString ("Antibiogramm", 10, 570, 0, "BArial", 32, 0,PRINTSTRING_ALIGN_CENTER)
PrintBox (Box_Type_Flat_Box, 10, @PageExtentY ( ) , @PageExtentX ( ), 1)
...
Thank you.
  

Dr. med. Amor Belhareth&&Medizin Labor &&Germany
Back to top
 
IP Logged
 
Ray the Reaper
Global Moderator
Members
Lantica Support
*****
Offline


The One & The Only

Posts: 2482
Joined: Aug 20th, 2003
Re: Prinstring Problem
Reply #9 - Oct 15th, 2010 at 8:26pm
Print Post Print Post  
Quote:
Hello!
Please how toget the Blue Box?


      PrintRGBColor (15,56,130) // Blue Color
     
       Printstring ("Facharzt für Mikrobiologie, Virologie und Infektionsepidemiologie", 0, @PageExtentY()+10 , 0, vFont, 14, 0)
     PrintString ("MDL Dr. Belhareth. Am Pferdemarkt 4a . 26003 Aurich", 10, @PageExtentY()+30, 0, vFont, 14, 0)
     PrintBox (Box_Type_Flat_Box, 10, @PageExtentY ( ), @PageExtentX( ), 1)
     
       PrintBox(32, 0, 480, 850, 800)   ---- > i get a gray Box ?

     PrintRGBColor (1, 0, 0)

Thank you for the help.

Dr. Belhareth


Hello Amor,

Not all boxes are filled in with color as some are just borders. The code below will give you a blue box that is filled in

Code
Select All
PrintBox(1, 0, 480, 850, 800)  



-Ray
  

Raymond Yoxall Consulting
ray.yoxall@gmail.com
ryoxall@lantica.com
Sesame Applications, Design and Support
Back to top
IP Logged
 
Amor
Full Member
Members
***
Offline


No personal text

Posts: 366
Location: Germany
Joined: Feb 7th, 2004
Re: Prinstring Problem
Reply #10 - Oct 15th, 2010 at 8:32pm
Print Post Print Post  

Hello Rey,

I want the  boxe not filled with color just the  border is Blue.

Thanks
  

Dr. med. Amor Belhareth&&Medizin Labor &&Germany
Back to top
 
IP Logged
 
Ray the Reaper
Global Moderator
Members
Lantica Support
*****
Offline


The One & The Only

Posts: 2482
Joined: Aug 20th, 2003
Re: Prinstring Problem
Reply #11 - Oct 15th, 2010 at 8:34pm
Print Post Print Post  
Quote:
Hello!
Anther Question:
i want a title centered and underlined how do you please?
this das not work:

PrintString ("Antibiogramm", 10, 570, 0, "BArial", 32, 0,PRINTSTRING_ALIGN_CENTER)
PrintBox (Box_Type_Flat_Box, 10, @PageExtentY ( ) , @PageExtentX ( ), 1)
...
Thank you.


Hello Amor,

To center text you have to set a width for the PrintString statement

Code
Select All
PrintString ("Antibiogramm", 10, 570, 807, "BArial", 32, 0,PRINTSTRING_ALIGN_CENTER) 



-Ray
  

Raymond Yoxall Consulting
ray.yoxall@gmail.com
ryoxall@lantica.com
Sesame Applications, Design and Support
Back to top
IP Logged
 
Ray the Reaper
Global Moderator
Members
Lantica Support
*****
Offline


The One & The Only

Posts: 2482
Joined: Aug 20th, 2003
Re: Prinstring Problem
Reply #12 - Oct 15th, 2010 at 8:39pm
Print Post Print Post  
Quote:

Hello Rey,

I want the  boxe not filled with color just the  border is Blue.

Thanks  


Code
Select All
PrintBox(16, 0, 480, 850, 800)  



-Ray
  

Raymond Yoxall Consulting
ray.yoxall@gmail.com
ryoxall@lantica.com
Sesame Applications, Design and Support
Back to top
IP Logged
 
Amor
Full Member
Members
***
Offline


No personal text

Posts: 366
Location: Germany
Joined: Feb 7th, 2004
Re: Printstring Problem
Reply #13 - Oct 15th, 2010 at 10:19pm
Print Post Print Post  
Rey-

Thank you very much for the help.
It works fine.

I have i hope the last  question about Printstring:

I want to modify condtionnally the background color usind PrintRGBColor (), is that possible?

Thanks.
  

Dr. med. Amor Belhareth&&Medizin Labor &&Germany
Back to top
 
IP Logged
 
Ray the Reaper
Global Moderator
Members
Lantica Support
*****
Offline


The One & The Only

Posts: 2482
Joined: Aug 20th, 2003
Re: Printstring Problem
Reply #14 - Oct 18th, 2010 at 2:40pm
Print Post Print Post  
Hello Amor,

The background color of the entire page? That could be done by placing a colored box over the entire page first and then printing text over the box.

-Ray
  

Raymond Yoxall Consulting
ray.yoxall@gmail.com
ryoxall@lantica.com
Sesame Applications, Design and Support
Back to top
IP Logged
 
Amor
Full Member
Members
***
Offline


No personal text

Posts: 366
Location: Germany
Joined: Feb 7th, 2004
Re: Printstring Problem
Reply #15 - Oct 18th, 2010 at 9:36pm
Print Post Print Post  
Hello Ray,

I mean The background color of  a Field.
Can i place also a colored box and  then printing text over the box?

Another Question: in a Document with more then one page how can habe the Number of pages
So i can write in the first page per example page 1 from 6   ?

Thank you for the help.

Dr. Belhareth
  

Dr. med. Amor Belhareth&&Medizin Labor &&Germany
Back to top
 
IP Logged
 
Ray the Reaper
Global Moderator
Members
Lantica Support
*****
Offline


The One & The Only

Posts: 2482
Joined: Aug 20th, 2003
Re: Printstring Problem
Reply #16 - Oct 19th, 2010 at 3:25pm
Print Post Print Post  
Quote:
Hello Ray,

I mean The background color of  a Field.
Can i place also a colored box and  then printing text over the box?


Yes you can. You would have to print the text first with the Measure only flag set to 1. This way you know how big to make the box using @PrintLastHeight() and @PrintLastWidth(). Then print the box. Then print the text over the box.

Quote:
Another Question: in a Document with more then one page how can habe the Number of pages
So i can write in the first page per example page 1 from 6   ?


You can number the pages with the page number but until you assemble all the pages you have no idea how many pages of data you have. So you can put on the bottom of the page "Page 3" for example but you can't put "Page 3 of 6"

Quote:
Thank you for the help.

Dr. Belhareth


You are welcome.
Ray
  

Raymond Yoxall Consulting
ray.yoxall@gmail.com
ryoxall@lantica.com
Sesame Applications, Design and Support
Back to top
IP Logged
 
Amor
Full Member
Members
***
Offline


No personal text

Posts: 366
Location: Germany
Joined: Feb 7th, 2004
Re: Printstring Problem
Reply #17 - Oct 19th, 2010 at 9:21pm
Print Post Print Post  
Hello Ray!

i thank you so much for the recommandations.

There´s no Superposition Box -text. Waht i ´m doing wrong?
is my code hier what you suggest?


PrintString ("Kulturegebnisse           Quantifizierung            Klinische Bedeutung  ", 10, @PageExtentY ( ), 0, vFont, vFontSize, 1)
vHeight = @PrintLastHeight()
vLength = @PrintLastWidth()
//writeln(vHeight + @nL() + vLength )
PrintBox (1, 10,@PageExtentY ( ), vLength , vHeight)
PrintString ("Kulturegebnisse           Quantifizierung           Klinische Bedeutung  ", 10, @PageExtentY ( ) , 0,vFont  , vFontSize, 0)
  

Dr. med. Amor Belhareth&&Medizin Labor &&Germany
Back to top
 
IP Logged
 
Ray the Reaper
Global Moderator
Members
Lantica Support
*****
Offline


The One & The Only

Posts: 2482
Joined: Aug 20th, 2003
Re: Printstring Problem
Reply #18 - Oct 20th, 2010 at 6:44pm
Print Post Print Post  
Hello Amor,

Try

at the top of your code
Code
Select All
Var vY as Int 



and then

Code
Select All
vY = @PageExtentY()
PrintString ("Kulturegebnisse           Quantifizierung            Klinische Bedeutung  ", 10, vY, 0, vFont, vFontSize, 1)
vHeight = @PrintLastHeight()  
vLength = @PrintLastWidth()
PrintBox (1, 10, vY, vLength + 5, vHeight)
PrintString ("Kulturegebnisse           Quantifizierung           Klinische Bedeutung  ", 10, vY , 0,vFont  , vFontSize, 0)   



-Ray
  

Raymond Yoxall Consulting
ray.yoxall@gmail.com
ryoxall@lantica.com
Sesame Applications, Design and Support
Back to top
IP Logged
 
Amor
Full Member
Members
***
Offline


No personal text

Posts: 366
Location: Germany
Joined: Feb 7th, 2004
Re: Printstring Problem
Reply #19 - Oct 21st, 2010 at 7:57pm
Print Post Print Post  
Hello Ray,

Yes, Today i finished my first Print- Projekt using PrinSting and it´s perfect.

Ray i´m still learning.

Thanks.
  

Dr. med. Amor Belhareth&&Medizin Labor &&Germany
Back to top
 
IP Logged
 
Ray the Reaper
Global Moderator
Members
Lantica Support
*****
Offline


The One & The Only

Posts: 2482
Joined: Aug 20th, 2003
Re: Printstring Problem
Reply #20 - Oct 21st, 2010 at 8:57pm
Print Post Print Post  
Glad I could help.

-Ray
  

Raymond Yoxall Consulting
ray.yoxall@gmail.com
ryoxall@lantica.com
Sesame Applications, Design and Support
Back to top
IP Logged