Color Calendario...

[thelibmx]

hola yo soy nuevo en esto, tengo el mismo problema del calendario, asi que decidi instalar el componente del maxcalendar, la cosa es que soy tan nuevo en esto que no se como verlo o incluirlo dentro de delphi, yo estoy trabajando en la version de delphi 2006, ya instale el executable del calendario Maxcalendar, si alguien podria decirme que mas sigue para visualizarlo o ejecutarlo dentro del programa, de antemano muchas gracias

[[Lepe]]

Realmente no lo tienes instalado.

Ve a la carpeta donde se ha instalado, normalmente en:
C:\Archivos de programa\MaxComponents\mxCalendar\Component

Allí verás una seri de paquetes (extensión dpk). El que corresponde a BDS2006 es mxCalendar_d10.dpk, dale doble clic para abrirlo desde Delphi,

Añade la ruta antes mencionada en Tools -> Options -> Borland delphi -> library path (para que encuentre los fuentes al compilar).

Ahora, en el menú de delphi View -> Project Manager, creo recordar la pestaña Projects, verás el mxCalendar, usa el botón derecho para compilar y después instalar.

Ahora si, aparecerá un mensaje diciendo que se ha instalado en la paleta de componentes, en concreto, en una nueva paleta llamada "Max".

Saludos

[thelibmx]

Muchas gracias, ya lo puedo ver, me ha servido de mucha ayuda, por ultimo y si no es molestia, tendras alguna pagina o algun tutorial donde pueda ver como puedo ocupar las propiedades de ese componente(maxcalendar)?, veras el uso que le quiero dar es que por ejemplo al dar un click sobre el calendario, me marque el dia de un color y me lo guarde en una base de datos, para que posteriormente al volver a ver el componente se muestren los dias seleccionados con un color, bueno espero que me puedan ayudar, y felicito a todos y cada uno de ellos que hace posible este foro, ya sea con sus consejos o preguntas mil gracias buen dia.. gracias lepe

[[Lepe]]

Usa el evento OnGetItemStyle y en los parámetros que lleva tienes:

- La fecha que se va a pintar
- la fuente (TFont) que puedes modificar a voluntad
- El color de fondo (que también puedes modificarlo
- (algo más que no recuerdo ).

Como ves, tendrás que usar ese evento cada vez que se cambia de mes para resaltar los días que quieras.

Tutorial o Ejemplo no tengo, lo siento.

Saludos

[thelibmx]

Hola Gracias por el dato ya lo puse y me sale algo parecido a esto

mxcalendar1.OnGetItemStyle(Sender:TmxCustomCalendar;AstyleType:TmxStyleType;ADate:TDate;var AFont:Tfont; var AColor:TColor)

pero he estado intentando poner algo para modificar y creo qe mi sintasix es incorrecta,podrias por favor explicarme un poco como es que deberia de ir la sintaxis para modificarlo es decir sender es el destinatario o destino ahi debo de poner el nombre de mi calendar¿?, luego Astyletype:TmxStyltype; en el primero es el nombre de la propiedad o como, se que soy un pequeño dolor de cabeza, si alguien pudiera escribir una linea con los datos de un ejemplo de como debe de ir esa linea le entenderia mejor, o q alguien me diga como lo debo de poner para poder cambiar el color, de verdad que me da pena estar haciendo tantas preguntas pero pues soy nuevo y son los pequeños topes qe me voy dando jeje... espero que esta sea mi ultima preguntilla de hoy, Gracias por su comprension jjeeje.

[[Lepe]]

Código Delphi [-]
uses DateUtils;

mxcalendar1.OnGetItemStyle(Sender:TmxCustomCalendar;AstyleType:TmxStyleType;
                      ADate:TDate;var AFont:Tfont; var AColor:TColor)

var MiFecha :Tdate;
begin
// colorear según la fecha que yo quiera:
MiFecha := encodeDate(2007, 03, 25);
if ADate = MiFecha then
begin
  AFont.Style := AFont.Style + [fsBold] // poner en negrita la letra de ese día
  Acolor := clRed; // color de esa fecha en rojo
end;

// colorear todos los fines de semana:
if AStyleType = stWeekend then AColor := clgreen

//colorear la fecha que hace click
else if AStyleType = stSelected then AColor := clYellow;
....
// mira en mxCalendar.pas para ver el StyleType

Saludos

[Bluefox]

Eso que quieres, creo que en la Jedi hay un control que te pone en color el los dias de las semana que quieras..

[thelibmx]

Empezado por Lepe

Código Delphi [-]
uses DateUtils;

mxcalendar1.OnGetItemStyle(Sender:TmxCustomCalendar;AstyleType:TmxStyleType;
ADate:TDate;var AFont:Tfont; var AColor:TColor)

var MiFecha :Tdate;
begin
// colorear según la fecha que yo quiera:
MiFecha := encodeDate(2007, 03, 25);
if ADate = MiFecha then
begin
AFont.Style := AFont.Style + [fsBold] // poner en negrita la letra de ese día
Acolor := clRed; // color de esa fecha en rojo
end;

// colorear todos los fines de semana:
if AStyleType = stWeekend then AColor := clgreen

//colorear la fecha que hace click
else if AStyleType = stSelected then AColor := clYellow;
....
// mira en mxCalendar.pas para ver el StyleType






Saludos

oye ahi en donde esta la sintaxys para colorear la fecha que yo quiera, yo he asignado manualmente las fechas y si se pintan, mi duda es... hay una manera de que pueda hacer lo mismo pero introduciendo las fechas desde un Tedit, o caja de texto?, si se puede, podrias poner un codigo de ejemplo, please, por que he intentado ligarlos y no he podido,