Converter Variável tipo Word para ...
Como converto uma variável do tipo word para string ou outra qualquer?
Já procurei no help e no forum, mas não achei nada parecido.
ex.:
Ano, Mes, Dia : word;
Data : string;
...
Data := WordToStr(Mes); // é possível?
Já procurei no help e no forum, mas não achei nada parecido.
ex.:
Ano, Mes, Dia : word;
Data : string;
...
Data := WordToStr(Mes); // é possível?
Douglas Bitencourt
Curtidas 0
Respostas
Luineumann
04/12/2003
alguns exemplos para voce
ano, mes, dia : word;
data : string;
dia := 1;
mes := 5;
ano := 2003;
data := inttostr(dia) + ´/´ + inttostr(mes) + ´/´ + inttostr(ano);
data fica ´1/5/2003´
pode ser também
data:= formatfloat(´00´, dia) + ´/´ + formatfloat(´00´, mes) + ´/´ + formatfloat(´0000´, ano);
data fica ´01/05/2003´
agora se você deseja formar datas tb pode usar formatdatetime
ano, mes, dia : word;
data_st : string;
data : tdatetime;
dia := 1;
mes := 5;
ano := 2003;
data := encodedate(ano, mes, dia);
data_st := formatdatetime(´dd/mm/yyyy´, data); ==> 01/05/2003
data_st := formatdatetime(´dd/mm/yy´, data); ==> 01/05/03
data_st := formatdatetime(´dd/mmm/yyyy´, data); ==> 01/mai/2003
data_st := formatdatetime(´dd/mmmm/yyyy´, data); ==> 01/maio/2003
data_st := formatdatetime(´dd/mm/yyyy,ddd´, data); ==> 01/05/2003,seg
data_st := formatdatetime(´´Itajubá, ´dd´ de ´mm´ de ´yyyy´, data); ==> Itajubá, 01 de maio de 2003
ano, mes, dia : word;
data : string;
dia := 1;
mes := 5;
ano := 2003;
data := inttostr(dia) + ´/´ + inttostr(mes) + ´/´ + inttostr(ano);
data fica ´1/5/2003´
pode ser também
data:= formatfloat(´00´, dia) + ´/´ + formatfloat(´00´, mes) + ´/´ + formatfloat(´0000´, ano);
data fica ´01/05/2003´
agora se você deseja formar datas tb pode usar formatdatetime
ano, mes, dia : word;
data_st : string;
data : tdatetime;
dia := 1;
mes := 5;
ano := 2003;
data := encodedate(ano, mes, dia);
data_st := formatdatetime(´dd/mm/yyyy´, data); ==> 01/05/2003
data_st := formatdatetime(´dd/mm/yy´, data); ==> 01/05/03
data_st := formatdatetime(´dd/mmm/yyyy´, data); ==> 01/mai/2003
data_st := formatdatetime(´dd/mmmm/yyyy´, data); ==> 01/maio/2003
data_st := formatdatetime(´dd/mm/yyyy,ddd´, data); ==> 01/05/2003,seg
data_st := formatdatetime(´´Itajubá, ´dd´ de ´mm´ de ´yyyy´, data); ==> Itajubá, 01 de maio de 2003
GOSTEI 0
Douglas Bitencourt
04/12/2003
Muito obrigado luineumann por tirar minha dúvida.
[]s
Douglas.
[]s
Douglas.
GOSTEI 0