Como formatar uma QrDbText?

Delphi

02/04/2008

Amigos,
Boa noite.

Gostaria de saber como formatar uma QrDbText. No relatório é retornado um valor de campo Date/Time do access. Gostaria de mostrar apenas a hora. Como posso fazer isso? é possivel?

abraços!


Framosip

Framosip

Curtidas 0

Respostas

Joaoshi

Joaoshi

02/04/2008

Colega, isto você resolve no evento [b:25d57c128e]OnPrint[/b:25d57c128e] do QrDbText

Espero ter ajudado.


GOSTEI 0
Framosip

Framosip

02/04/2008

poderia me dar um exemplo?


GOSTEI 0
Joaoshi

Joaoshi

02/04/2008

Colega, no Evento OnPrinto do QrDbText:

Value := FormatDateTime(´HH:MM:SS´,CampoDaSuaTabela.asDateTime);


GOSTEI 0
Framosip

Framosip

02/04/2008

blz.

E como eu poderia colo ***** para um campo de senha por exemplo?

abraços!


GOSTEI 0
Joaoshi

Joaoshi

02/04/2008

Não entendi, No QrDbText ?

Value := ´**********´;


GOSTEI 0
Framosip

Framosip

02/04/2008

Isso...

pode parecer estranho colocar *** em um relatório...mas o usuário poderá escolher entre colocar *** ou não.

mas agora Value := ´**********´;....

todos pegaram este valor...mesmo tendo 1 ou 1000 carateres?

abraços!


GOSTEI 0
Joaoshi

Joaoshi

02/04/2008

Value := StringofChar(´*´,Length(CampoDaSuaTabela.Text));


GOSTEI 0
Framosip

Framosip

02/04/2008

Testei aqui dessa forma e sempre aparece o mesmo numero de *.

Porém fiz assim:

Value := StringofChar(´*´,Length(value));


e funcionou, valeu pela ajuda.


GOSTEI 0
POSTAR