veja: quando vc usa a função DATETOSTR, ele assume a configuração q tá lá no 
painel de controle, nas configurações regionais.
Daí, se vc quer uma formatação prevista no seu sw, vc deve usar uma outra 
função de conversão: FORMATDATETIME.

vc usa assim:

var
  s : string;
  t : Tdatetime;
begin
   t := now;
   s := formatdatetime('dd/mm/yyyy hh:nn:ss',t);
end;


daí, vc deve saber:

d - retorna o dia. ex: dia 6
dd - retorna o dia. ex: dia 06
ddd - retorna o dia da semana. ex: Qui
dddd - retorna o dia da semana. ex: Quinta Feira
e por aí vai...

m é o mês
y é o ano
h é a hora
n é o minuto
s é o segundo



mais referências:

c Displays the date using the format given by the ShortDateFormat global 
variable, followed by the time using the format given by the LongTimeFormat 
global variable. The time is not displayed if the fractional part of the 
DateTime value is zero.
d Displays the day as a number without a leading zero (1-31).
dd Displays the day as a number with a leading zero (01-31).
ddd Displays the day as an abbreviation (Sun-Sat) using the strings given by 
the ShortDayNames global variable.
dddd Displays the day as a full name (Sunday-Saturday) using the strings given 
by the LongDayNames global variable.
ddddd Displays the date using the format given by the ShortDateFormat global 
variable.
dddddd Displays the date using the format given by the LongDateFormat global 
variable.
m Displays the month as a number without a leading zero (1-12). If the m 
specifier immediately follows an h or hh specifier, the minute rather than the 
month is displayed.
mm Displays the month as a number with a leading zero (01-12). If the mm 
specifier immediately follows an h or hh specifier, the minute rather than the 
month is displayed.
mmm Displays the month as an abbreviation (Jan-Dec) using the strings given by 
the ShortMonthNames global variable.
mmmm Displays the month as a full name (January-December) using the strings 
given by the LongMonthNames global variable.
yy Displays the year as a two-digit number (00-99).
yyyy Displays the year as a four-digit number (0000-9999).
h Displays the hour without a leading zero (0-23).
hh Displays the hour with a leading zero (00-23).
n Displays the minute without a leading zero (0-59).
nn Displays the minute with a leading zero (00-59).
s Displays the second without a leading zero (0-59).
ss Displays the second with a leading zero (00-59).
t Displays the time using the format given by the ShortTimeFormat global 
variable.
tt Displays the time using the format given by the LongTimeFormat global 
variable.
am/pm Uses the 12-hour clock for the preceding h or hh specifier, and displays 
'am' for any hour before noon, and 'pm' for any hour after noon. The am/pm 
specifier can use lower, upper, or mixed case, and the result is displayed 
accordingly.
a/p Uses the 12-hour clock for the preceding h or hh specifier, and displays 
'a' for any hour before noon, and 'p' for any hour after noon. The a/p 
specifier can use lower, upper, or mixed case, and the result is displayed 
accordingly.
ampm Uses the 12-hour clock for the preceding h or hh specifier, and displays 
the contents of the TimeAMString global variable for any hour before noon, and 
the contents of the TimePMString global variable for any hour after noon.
/ Displays the date separator character given by the DateSeparator global 
variable.
: Displays the time separator character given by the TimeSeparator global 
variable.
'xx'/"xx" Characters enclosed in single or double quotes are displayed as-is, 
and do not affect formatting.





  ----- Original Message ----- 
  From: Fernando Luiz Bortolanzza 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, July 06, 2006 12:58 PM
  Subject: RES: [delphi-br] formatar data


  Eu coloco isso no form create

  Shortdateformat:= 'dd/mm/yyyy'; 


  -----Mensagem original-----
  De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
  nome de Rubem Nascimento da Rocha
  Enviada em: quinta-feira, 6 de julho de 2006 12:18
  Para: delphi-br@yahoogrupos.com.br
  Assunto: RE: [delphi-br] formatar data
  Prioridade: Alta

  1) Se isso acontece, é sinal de que o conteúdo que tu tá passando pra 
  StrToDate() deve ser uma string em branco;

  2) Se tu está editando um campo data com TDBEdit, pq simplesmente não acessa

  o valor do campo associado ao TDBEdit pelo objeto TField associado a ele?

  Sds.


  >From: "Anderson" <[EMAIL PROTECTED]>
  >Reply-To: delphi-br@yahoogrupos.com.br
  >To: "delphi-br" <delphi-br@yahoogrupos.com.br>
  >Subject: [delphi-br] formatar data
  >Date: Thu, 6 Jul 2006 09:26:09 -0300
  >
  >como faço para colocar a data no formato dd/mm/aa
  >
  >meu codigo
  >
  >
  >table1data.AsString:=(datetostr(strtodate(dbedit10.Text)));
  >
  >mas ele coloca a data no formato 0/0/0000
  >
  >[As partes desta mensagem que não continham texto foram removidas]
  >

  _________________________________________________________________
  MSN Busca: fácil, rápido, direto ao ponto.  http://search.msn.com.br



  -- 
  <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>



  Links do Yahoo! Grupos











   

  __________ Informação do NOD32 IMON 1.1646 (20060706) __________

  Esta mensagem foi verificada pelo NOD32 sistema antivírus
  http://www.eset.com.br



[As partes desta mensagem que não continham texto foram removidas]



-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

<*> Para ver as mensagens antigas, acesse:
    http://br.groups.yahoo.com/group/delphi-br/messages

<*> Para falar com o moderador, envie um e-mail para:
    [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

<*> Para visitar o site do seu grupo na web, acesse:
    http://br.groups.yahoo.com/group/delphi-br/

<*> Para sair deste grupo, envie um e-mail para:
    [EMAIL PROTECTED]

<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
    http://br.yahoo.com/info/utos.html

 


Responder a