Calendário
olá pessoal
tenho um form onde seleciono um medico. tenho uma tabela com agendamentos deste medico para algumas datas.
gostaria q ao selecionar este medico, no meu componente de Calendario aparecesse os dias (para o mes que tá selecionado) em que ele tem agendamentos de uma cor diferente.
não sei o componente Calendar do Delphi dá pra fazer isso, caso contrário qual componente utilizar ?
abraço
Diogo
tenho um form onde seleciono um medico. tenho uma tabela com agendamentos deste medico para algumas datas.
gostaria q ao selecionar este medico, no meu componente de Calendario aparecesse os dias (para o mes que tá selecionado) em que ele tem agendamentos de uma cor diferente.
não sei o componente Calendar do Delphi dá pra fazer isso, caso contrário qual componente utilizar ?
abraço
Diogo
Diogoalles
Curtidas 0
Respostas
Aroldo Zanela
09/01/2004
Colega,
Você pode utilizar o evento GetMonthInfo e fazer algo como:
Você pode utilizar o evento GetMonthInfo e fazer algo como:
procedure TForm1.MonthCalendar1GetMonthInfo(Sender: TObject; Month: Cardinal; var MonthBoldInfo: Cardinal); begin MonthCalendar1.BoldDays([1,8,15,26], MonthBoldInfo); // Dias que serão exibidos em negrito end;
GOSTEI 0
Rfpsatin
09/01/2004
[quote:1736b2e2e5=´Aroldo Zanela´]Colega,
Você pode utilizar o evento GetMonthInfo e fazer algo como:
[/quote:1736b2e2e5]
Aroldão, muito massa essa dica :D
tava atraz faz tempo.
abraço
Você pode utilizar o evento GetMonthInfo e fazer algo como:
procedure TForm1.MonthCalendar1GetMonthInfo(Sender: TObject; Month: Cardinal; var MonthBoldInfo: Cardinal); begin MonthCalendar1.BoldDays([1,8,15,26], MonthBoldInfo); // Dias que serão exibidos em negrito end;
Aroldão, muito massa essa dica :D
tava atraz faz tempo.
abraço
GOSTEI 0
Maickelpc
09/01/2004
Haroldao, com o monthCalendar ou algum outro, voce sabe como posso pintar o calendario? ex ao inves de deixar negrito..pintar a celula...ou a fonte?
GOSTEI 0