I am using Sesame version 2.0.4 and I have incorporated the calendar that Ray created into my application. 

I use the calendar to schedule our on-site jobs at our client's facility.  I have added programming that will change the font color depending on whether the schedule is confirmed, or it is tentative.  I used the RGBColor command to change the font, but as soon as I exit that form, and re-enter the form, the font changes are removed. 

Is there a way to permanently have the font colors change?

Thank so much for your input!!!

Here is the code I am using:

In Global Code =

#include "sbasic_include.sbas"

stat vFont as String

Subroutine Confirmation()
UnSetThisElement()

If @IsBlank(ThisElement) = False
{
	If @AskUser("Has this scheduled date been confirmed by the client?", "", "")
	{
		RGBColor(ThisElement, 0, 0, 0, 255, 255, 255)		// Black font for confirmed
	}
	Else If ThisElement = "Holiday"
	{
		RGBColor(ThisElement, 255, 0, 0, 255, 255, 255)		// Red font for holidays
	}
	Else
	{
		RGBColor(ThisElement, 0, 255, 0, 255, 255, 255)		// Green font for tentative
	}

	Attribute(ThisElement, ATTR_ID_FONT, "BArial")			// Make font bold
	FormCommit("")
}

End Subroutine
 

Then "On Element Exit" of each day (text area) I have the subroutine called. 

This allows me to enter data for a particular day, and have the control to modify each day's text without affecting the other days.

Although, I really appreciate the response, will using the ON FORM events allow me this flexibility and control of each day?

Thank you!!! 

I'll need to do some formatting and programming changes.  I'll get it done eventually.  Thank you so much for the suggestions.

Quote:

http://lantica.com/Files/SampleApps/Calendar.zip

You would just need to have another field on the form that is hidden and automatically populated with each person's name or ID. Set it up so each person can only get their own records. And switch the system that makes the new month from GlobalValues to an X command to see what the latest month that person has in the system.

-Ray