Angel
Master
Registrado: 15 Abr 2003Mensajes: 2311Ubicación: Toledo (España)
|
 Publicado: Lun 22 Ene, 2018 6:56 pm Asunto: Aspecto de un formulario con xp.rc |
 |
|
Tengo un formulario (en BCB6) que tiene sólo un TMonthCalendar y un TButton. Me está ocurriendo algo que yo al menos no había visto antes.
Si compilo el proyecto con el fichero de recursos xp.rc (para hacer el aspecto un poco más elegante) veo esto:
Pero si lo compilo sin ese fichero lo veo así:
Evidentemente la forma lógica es la inferior. He de decir que en el TMonthCalendar tengo puesto este código en el evento OnGetMonthInfo para que me resalte un rango de fechas concreto:
| Código: | void __fastcall TfCalendar::FechaGetMonthInfo(TObject *Sender, DWORD Month, DWORD &MonthBoldInfo)
{
std::vector<unsigned> dias;
for (TDate d = Fecha->MinDate; d <= Fecha->MaxDate; d ++)
{
if (d.DayOfWeek() == 1 || d.DayOfWeek() == 7)
continue;
unsigned short anyo, mes, dia;
d.DecodeDate(&anyo, &mes, &dia);
if (static_cast<DWORD>(mes) == Month)
dias.push_back(dia);
}
if (dias.size() > 0)
Fecha->BoldDays(&dias[0], dias.size() - 1, static_cast<unsigned>(MonthBoldInfo));
} |
pero he comprobado que el no poner ese código no afecta al aspecto del formulario. No sé si ocurrirá lo mismo en otros formularios (no he podido probar todos).
_________________
Un saludo
Necesitamos tu ayuda: Envía AI al 27595 (Coste 1,20 euros + IVA) |
|
FAQ
Buscar
Miembros
Grupos de Usuarios
Registrarse
Perfil
Entra para ver tus mensajes privados
Entrar
