Código
{No evento OnClick de um botão digite o seguinte código: }
ShowMessage(FormatDateTime('dddddd',Now));
{Os incríveis 6 (d)'dês" retornam a data por extenso sem precisar de nenhuma função adicional}
// UM SALVE A BORLAND
//Espero que ajudem muitos.
Planeta Delphi - www.planetadelphi.com.br - Todos os direitos reservados | Copyright 2001-2009