Fórum Relatorio dinamico com o quick report #476147
12/04/2014
0
galera segui o emeplo desse endereço
https://www.devmedia.com.br/gerando-relatorio-dinamicos-usando-quickrep/352
pórem ta dando erro
quando ele fala para declarar as variaveis
Pagina:Integer;
QrLabel:array[1..8] of string;
QrDbText:array[1..8] of string;
Desc,Campo:array[1..8] of String;
Largura:Array[1..8] of Integer;
o delphi7 diz nao exitir esse variavel
enatão mudei pra string blz so que quando chega nessa parte da erro
QrLabel[i+1] := QrLabel.Create(Form2.QuickRep1.Bands.ColumnHeaderBand);
QrLabel[i+1].Parent := Form2.QuickRep1.Bands.ColumnHeaderBand;
QrLabel[i+1].Left := Col;
QrLabel[i+1].Top := 4;
QrLabel[i+1].Caption := ListBox2.Items.Strings[i];
QrLabel[i+1].Font.Style := [fsunderline,fsbold];
e não sao poucos
ld
[Warning] U_gerar_relatorio.pas(86): Return value of function 'PosCampo' might be undefined
[Error] U_gerar_relatorio.pas(349): Record, object or class type required
[Error] U_gerar_relatorio.pas(351): Record, object or class type required
[Error] U_gerar_relatorio.pas(353): Record, object or class type required
[Error] U_gerar_relatorio.pas(355): Record, object or class type required
[Error] U_gerar_relatorio.pas(357): Record, object or class type required
[Error] U_gerar_relatorio.pas(359): Record, object or class type required
[Error] U_gerar_relatorio.pas(365): Undeclared identifier: 'TQrDbtext'
[Error] U_gerar_relatorio.pas(365): Undeclared identifier: 'FrmRelatorios'
[Error] U_gerar_relatorio.pas(365): ')' expected but identifier 'QuickRep1' found
[Error] U_gerar_relatorio.pas(365): Missing operator or semicolon
[Error] U_gerar_relatorio.pas(389): Missing operator or semicolon
[Error] U_gerar_relatorio.pas(393): Record, object or class type required
[Error] U_gerar_relatorio.pas(395): Record, object or class type required
[Error] U_gerar_relatorio.pas(431): Undeclared identifier: 'Dm'
[Error] U_gerar_relatorio.pas(433): Missing operator or semicolon
[Error] U_gerar_relatorio.pas(433): Missing operator or semicolon
[Error] U_gerar_relatorio.pas(435): Missing operator or semicolon
[Error] U_gerar_relatorio.pas(435): Missing operator or semicolon
[Error] U_gerar_relatorio.pas(439): Missing operator or semicolon
[Error] U_gerar_relatorio.pas(439): Missing operator or semicolon
[Error] U_gerar_relatorio.pas(443): Missing operator or semicolon
[Error] U_gerar_relatorio.pas(449): Missing operator or semicolon
[Error] U_gerar_relatorio.pas(459): Record, object or class type required
[Error] U_gerar_relatorio.pas(461): Record, object or class type required
[Error] U_gerar_relatorio.pas(467): '.' expected but ';' found
[Error] U_gerar_relatorio.pas(469): Illegal character in input file: 'ó' ($F3)
[Warning] U_gerar_relatorio.pas(471): Text after final 'END.' - ignored by compiler
[Fatal Error] Prj_IEP.dpr(28): Could not compile used unit 'U_gerar_relatorio.pas'
porem se qalguem souber como fazer um realrório dinamico me ajuda
usu delphi7
mysql 5.0
com os componentes dbxexpress
https://www.devmedia.com.br/gerando-relatorio-dinamicos-usando-quickrep/352
pórem ta dando erro
quando ele fala para declarar as variaveis
Pagina:Integer;
QrLabel:array[1..8] of string;
QrDbText:array[1..8] of string;
Desc,Campo:array[1..8] of String;
Largura:Array[1..8] of Integer;
o delphi7 diz nao exitir esse variavel
enatão mudei pra string blz so que quando chega nessa parte da erro
QrLabel[i+1] := QrLabel.Create(Form2.QuickRep1.Bands.ColumnHeaderBand);
QrLabel[i+1].Parent := Form2.QuickRep1.Bands.ColumnHeaderBand;
QrLabel[i+1].Left := Col;
QrLabel[i+1].Top := 4;
QrLabel[i+1].Caption := ListBox2.Items.Strings[i];
QrLabel[i+1].Font.Style := [fsunderline,fsbold];
e não sao poucos
ld
[Warning] U_gerar_relatorio.pas(86): Return value of function 'PosCampo' might be undefined
[Error] U_gerar_relatorio.pas(349): Record, object or class type required
[Error] U_gerar_relatorio.pas(351): Record, object or class type required
[Error] U_gerar_relatorio.pas(353): Record, object or class type required
[Error] U_gerar_relatorio.pas(355): Record, object or class type required
[Error] U_gerar_relatorio.pas(357): Record, object or class type required
[Error] U_gerar_relatorio.pas(359): Record, object or class type required
[Error] U_gerar_relatorio.pas(365): Undeclared identifier: 'TQrDbtext'
[Error] U_gerar_relatorio.pas(365): Undeclared identifier: 'FrmRelatorios'
[Error] U_gerar_relatorio.pas(365): ')' expected but identifier 'QuickRep1' found
[Error] U_gerar_relatorio.pas(365): Missing operator or semicolon
[Error] U_gerar_relatorio.pas(389): Missing operator or semicolon
[Error] U_gerar_relatorio.pas(393): Record, object or class type required
[Error] U_gerar_relatorio.pas(395): Record, object or class type required
[Error] U_gerar_relatorio.pas(431): Undeclared identifier: 'Dm'
[Error] U_gerar_relatorio.pas(433): Missing operator or semicolon
[Error] U_gerar_relatorio.pas(433): Missing operator or semicolon
[Error] U_gerar_relatorio.pas(435): Missing operator or semicolon
[Error] U_gerar_relatorio.pas(435): Missing operator or semicolon
[Error] U_gerar_relatorio.pas(439): Missing operator or semicolon
[Error] U_gerar_relatorio.pas(439): Missing operator or semicolon
[Error] U_gerar_relatorio.pas(443): Missing operator or semicolon
[Error] U_gerar_relatorio.pas(449): Missing operator or semicolon
[Error] U_gerar_relatorio.pas(459): Record, object or class type required
[Error] U_gerar_relatorio.pas(461): Record, object or class type required
[Error] U_gerar_relatorio.pas(467): '.' expected but ';' found
[Error] U_gerar_relatorio.pas(469): Illegal character in input file: 'ó' ($F3)
[Warning] U_gerar_relatorio.pas(471): Text after final 'END.' - ignored by compiler
[Fatal Error] Prj_IEP.dpr(28): Could not compile used unit 'U_gerar_relatorio.pas'
porem se qalguem souber como fazer um realrório dinamico me ajuda
usu delphi7
mysql 5.0
com os componentes dbxexpress
Jose Silva
Curtir tópico
+ 0
Responder
Clique aqui para fazer login e interagir na Comunidade :)