Data

Question

Como configuro o QRSysData do Qreport (ou se tiver outro modo), com o formato de cidade, 26 de fevereiro de2003.Est� aparecendo 26/02/03....

Aroldo Zanela · Answer

[quote:d15ac96372=�Consorte�]Como configuro o QRSysData do Qreport (ou se tiver outro modo), com o formato de cidade, 26 de fevereiro de2003.Est� aparecendo 26/02/03.[/quote:d15ac96372]Coloque algo assim no OnPrint do QRSysData:[code:1:d15ac96372]procedure TForm1.QRSysData1Print(sender: TObject; var Value: String);beginValue := FormatDateTime(�"Goi�nia," dd "de" mmmm "de" yyyy�,StrToDate(Value));end;[/code:1:d15ac96372]...

Fred · Answer

Tente fazer o seguinte: coloque um qrlabel ao inves do sysdatafa�a assim qrlabel1.caption := formatdatetime(�ddddd�,Date) 8)...

Consorte · Answer

Como configuro o QRSysData do Qreport (ou se tiver outro modo), com o formato de cidade, 26 de fevereiro de2003. Est� aparecendo 26/02/03....

Lfernandos · Answer

Vc pode tentar usar o QRLabel ao inv�s do QRSysData, e usar o seguinte c�digo, mas use o c�digo no evento BeforePrint da Relat�rio.

procedure TForm1.QuickRep1BeforePrint(Sender: TCustomQuickRep;
var PrintReport: Boolean);
begin
QRLabel1.Caption := FormatDateTime(��Goi�nia,� dd �de� mmmm �de� yyyy�,Now);
end;

N�o sei se resolve o seu problema.

Consorte · Answer

At� agora n�o consegui com nenhumas dos exemplos, em qual banda devo coloca-la....

Aroldo Zanela · Answer

[quote:a3d52607f4=�Consorte�]Como configuro o QRSysData do Qreport (ou se tiver outro modo), com o formato de cidade, 26 de fevereiro de2003.Est� aparecendo 26/02/03.[/quote:a3d52607f4][b:a3d52607f4]Coloque algo assim no OnPrint do QRSysData:Se n�o conseguir, me manda o formul�rio que eu devolvo resolvido.[/b:a3d52607f4][code:1:a3d52607f4]procedure TForm1.QRSysData1Print(sender: TObject; var Value: String);beginValue := FormatDateTime(�"Goi�nia," dd "de" mmmm "de" yyyy�,StrToDate(Value));end;[/code:1:a3d52607f4]...

Consorte · Answer

Ainda n�o funcionou, o que est� errado?[quote:b6668dcd7a=�Aroldo Zanela�][quote:b6668dcd7a=�Consorte�]Como configuro o QRSysData do Qreport (ou se tiver outro modo), com o formato de cidade, 26 de fevereiro de2003.Est� aparecendo 26/02/03.[/quote:b6668dcd7a]Coloque algo assim no OnPrint do QRSysData:[code:1:b6668dcd7a]procedure TForm1.QRSysData1Print(sender: TObject; var Value: String);beginValue := FormatDateTime(�"Goi�nia," dd "de" mmmm "de" yyyy�,StrToDate(Value));end;[/code:1:b6668dcd7a][/quote:b6668dcd7a]...

Anonymous · Answer

Tente formatar no displayformat do table ou da query1, veja a documenta��o do delphi para tipos de m�scara...

Consorte · Answer

� um qrsysdata...

Anonymous · Answer

Tente com um labellabel1.caption = formatdatetime(���cidade ��dddddd�,now);se continuar com problematente inserir uma table e incluir o campo data e formatar pelo displayformat do campo...

Aroldo Zanela · Answer

[quote:4584dfefb3=�Consorte�]� um qrsysdata[/quote:4584dfefb3]Colega,Voc� recebeu um e-mail que lhe mandei retornando seu fonte, com o execut�vel e um arquivo PDF da impress�o?...

Daniel · Answer

existe um componente no site guiadodelphi.com.br
que ja da a data no extenso como voc� quer n�o precisa
colocar c�digo algum eu uso muito

va na se��o de componentes e peque o pacote EccJust

Espero ter ajudado

Daniel

F�rum Data #141845