Preciso que somente os código selecionados apareçam no relatório, e para isso eu coloquei este código no evento OnCreate do Form do Relatório :
procedure TfmRelAt.FormCreate(Sender: TObject);
var Total : Integer;
begin
Total := 0;
modProjeto.tbCadAt.First;
while not modProjeto.tbCadAt.Eof do
begin
query1.active := false;
query1.sql.clear;
query1.sql.add('SELECT Quantidade FROM dbCadAt.db WHERE CodPart = "'+fmGerarRelAt.Lista2.Items.Text+'"');
query1.active:= true;
Total := modProjeto.tbCadAtQuantidade.Value + Total;
modProjeto.tbCadAt.Next;
end;
qrLabel5.Caption := inttostr(Total);
end;
fmGerarRelAt : é o nome do Form do Relatório
Lista2 : é o nome da minha ListBox
O problema é que mesmo com esse código, o sistema compila mas acaba trazendo todos os códigos como a vocês podem ver na figura abaixo :
Pergunta
Alessandro
Serei breve...
Tenho um Form chamado fmGerarRelAt :
Clique aqui para ver o Form Gerar Relatório
Preciso que somente os código selecionados apareçam no relatório, e para isso eu coloquei este código no evento OnCreate do Form do Relatório :
fmGerarRelAt : é o nome do Form do Relatório
Lista2 : é o nome da minha ListBox
O problema é que mesmo com esse código, o sistema compila mas acaba trazendo todos os códigos como a vocês podem ver na figura abaixo :
Clique aqui para ver como sai o Relatório
Se alguém tiver alguma sugestão postaí para eu tentar....valeu
Link para o comentário
Compartilhar em outros sites
Top Posters For This Question
38
33
17
2
Dias Populares
Jul 15
21
Jul 20
19
Jul 22
16
Jul 19
16
Top Posters For This Question
Alessandro 38 posts
s3c 33 posts
Corposemalma 17 posts
Arlon 2 posts
Dias Populares
Jul 15 2004
21 posts
Jul 20 2004
19 posts
Jul 22 2004
16 posts
Jul 19 2004
16 posts
93 respostass a esta questão
Posts Recomendados