Fórum Dia da Semana com a primeira letra maiúscula #341904
17/05/2007
0
Olá pessoal, tudo bem? Espero que sim.
Essa dúvida pode parecer meio idiota, mas sou meio cri-cri com as coisas q faço. hehe
Eu consigo colocar uma data por extenso num StatusBar assim:
Só que o dia da semana e o mês, aparece todo em minúsculo, e eu gostaria que as primeiras letras fossem em maísculo.
É assim:
[b:cdb2ad2f11]quinta-feira, 17 de maio de 2007[/b:cdb2ad2f11]
E gostaria que ficasse assim:
[b:cdb2ad2f11]Quinta-Feira, 17 de Maio de 2007[/b:cdb2ad2f11]
Tem como fazer ou é muita paranóia minha? :oops:
Grato pela ajuda.
Essa dúvida pode parecer meio idiota, mas sou meio cri-cri com as coisas q faço. hehe
Eu consigo colocar uma data por extenso num StatusBar assim:
StbBackup.Panels[2].Text := FormatDatetime(´ dddd , dd " de " mmmm "de" yyyy ´, Date);
Só que o dia da semana e o mês, aparece todo em minúsculo, e eu gostaria que as primeiras letras fossem em maísculo.
É assim:
[b:cdb2ad2f11]quinta-feira, 17 de maio de 2007[/b:cdb2ad2f11]
E gostaria que ficasse assim:
[b:cdb2ad2f11]Quinta-Feira, 17 de Maio de 2007[/b:cdb2ad2f11]
Tem como fazer ou é muita paranóia minha? :oops:
Grato pela ajuda.
Aersoftware
Curtir tópico
+ 0
Responder
Posts
17/05/2007
Marco Salles
Ha alguma maneiras de fazer isto....
uma , acho que é usando o copy e a função AnsiUpperCase.. para deixar a promeira letra em maiscula
outra que acho mais interresante , apesar de inicialmete ser mais trabalhoso e entender o que se passas:
O delphi pega os nomes definidos nas configuraçoes regionais ... Muitas dessas configuraçoes são copiadas pelo delphi em constantes definidas na biblioteca
Redefina os valores destas cosntantes na abertura de sua aplicação
Assim no Oncreate:
Para os dias da semana
Citação:
[u:139ec30de0]tirado de :[/u:139ec30de0]
http://forum.devmedia.com.br/viewtopic.php?t=85177&highlight=&sid=fdd5ad5f270afe3cb1468f047d8e8fa4
uma , acho que é usando o copy e a função AnsiUpperCase.. para deixar a promeira letra em maiscula
outra que acho mais interresante , apesar de inicialmete ser mais trabalhoso e entender o que se passas:
O delphi pega os nomes definidos nas configuraçoes regionais ... Muitas dessas configuraçoes são copiadas pelo delphi em constantes definidas na biblioteca
Redefina os valores destas cosntantes na abertura de sua aplicação
Assim no Oncreate:
Para os dias da semana
Citação:
longDayNames[1] :=´é domindo pé de caximbo´
longdayNames[2] :=´é dia acordar com sono ´
longDayNames[3] :=´Tomara que passa rápido ´
longDayNames[4] :=´Hoje tem Vasção na TV ´
longDayNames[5] :=´Quinta nen acredito´
longdayNames[6] :=´Hoje não faço mais nada ´
longDayNames[7] :=´Não deveria acabar Nuca´
[u:139ec30de0]tirado de :[/u:139ec30de0]
http://forum.devmedia.com.br/viewtopic.php?t=85177&highlight=&sid=fdd5ad5f270afe3cb1468f047d8e8fa4
Responder
Gostei + 0
17/05/2007
Cfernandeslima
Label1.Caption := Format( ´¬s, ¬s de ¬s de ¬s´,
[ FormatDateTime( ´DDDD´, DTimePick.Date ),
FormatDateTime( ´DD´, DTimePick.Date ),
FormatDateTime( ´mmmm´, DTimePick.Date ),
FormatDateTime( ´YYYY´, DTimePick.Date )
]
);
no evento OnCreate do Form
LongDayNames[ 01 ] :=´Domindo´;
LongDayNames[ 02 ] :=´Segunda´;
LongDayNames[ 03 ] :=´Terça´;
LongDayNames[ 04 ] :=´Quarta´;
LongDayNames[ 05 ] :=´Quinta´;
LongDayNames[ 06 ] :=´Sexta´;
LongDayNames[07 ] :=´Sábado´;;
LongMonthNames[ 01 ] :=´Janeiro´;
LongMonthNames[ 02 ] :=´fevereiro´;
LongMonthNames[ 03 ] :=´Março´;
LongMonthNames[ 04 ] :=´Abril´;
LongMonthNames[ 05 ] :=´Maio´;
LongMonthNames[ 06 ] :=´Junho´;
LongMonthNames[ 07 ] :=´Julho´;
LongMonthNames[ 08 ] :=´Agosto´;
LongMonthNames[ 09 ] :=´Setembro´;
LongMonthNames[ 10 ] :=´Outubro´;
LongMonthNames[ 11 ] :=´Novembro´;
LongMonthNames[ 12 ] :=´Dezembro´;
[ FormatDateTime( ´DDDD´, DTimePick.Date ),
FormatDateTime( ´DD´, DTimePick.Date ),
FormatDateTime( ´mmmm´, DTimePick.Date ),
FormatDateTime( ´YYYY´, DTimePick.Date )
]
);
no evento OnCreate do Form
LongDayNames[ 01 ] :=´Domindo´;
LongDayNames[ 02 ] :=´Segunda´;
LongDayNames[ 03 ] :=´Terça´;
LongDayNames[ 04 ] :=´Quarta´;
LongDayNames[ 05 ] :=´Quinta´;
LongDayNames[ 06 ] :=´Sexta´;
LongDayNames[07 ] :=´Sábado´;;
LongMonthNames[ 01 ] :=´Janeiro´;
LongMonthNames[ 02 ] :=´fevereiro´;
LongMonthNames[ 03 ] :=´Março´;
LongMonthNames[ 04 ] :=´Abril´;
LongMonthNames[ 05 ] :=´Maio´;
LongMonthNames[ 06 ] :=´Junho´;
LongMonthNames[ 07 ] :=´Julho´;
LongMonthNames[ 08 ] :=´Agosto´;
LongMonthNames[ 09 ] :=´Setembro´;
LongMonthNames[ 10 ] :=´Outubro´;
LongMonthNames[ 11 ] :=´Novembro´;
LongMonthNames[ 12 ] :=´Dezembro´;
Responder
Gostei + 0
18/05/2007
Aersoftware
Valeu pessoal, funcionou perfeitamente. Agradeço a ajuda. Abraços. :D
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)