Bom dia
Aparentemente tinha conseguido resolver o meu problema mas o mesmo resultou em outro
problema.
Como tenho 62 locus pretendia criar 62 bandas, s� que quando estava na banda 17 n�o
conseguir colocar mais bandas pois o espa�o nao permitia. Alguma sugestao?
1)Como montar o relatorio.
Tenho uma tabela com a seguinte estrutura
Cultivar A1 A2 B1 B2 C1 C2
CV1 - - 12 14 - -
CV2 16 17 - - 8 9
CV3 21 21 14 16 6 5
sendo A locus A
B locus B
........
A1 alelo A1
A2 alelo A2
B1 alelo B1
B2 alelo B2
.....
....
Eu gostaria que saisse desta forma
Cultivar CV1 // t�tulo
Locus Alelo1 Alelo2
B 12 14
ou seja para cada cultivar, em uma p�gina separada, s� se imprimiria os locus onde os
alelos estao presentes (com valores)
Eu tentei da seguinte maneira
Criei uma banda detalhe onde coloquei (na primeira linha para formar o titulo) um
QRLabel com caption Cultivar e um QRDBText com o DataField Cultivar. Na segunda
linha tres QRLabel com os caption Locus, Alelo1 e Alelo2. Como queria que cada
cultivar saisse em um nova p�gina coloquei na propriedade ForcrNewPage da band detalhe
TRUE. At� aqui o relatorio estava como o previsto. Na hora de colocar os valores que
"a corda roeu" pois nao estou conseguindo fazer aparecer os dados.
/////////////////////
Estou enviando este email com o objetivo de ajudar quem por um acaso tiver o mesmo
problema levantado no �tem acima.
Vamos la
1- inseri uma banda datail onde atraves de um QRDBText associei o campo Cultivar
centralizando na banda (funcionando como um subt�titulo), como queria que cada
cultivar iniciasse eem uma novsa pagina coloquei na propriedade ForcrNewPage da band
detalhe TRUE.
Na mesma banda em uma area mais inferior coloquei tres QRLabel, na mesma linha, cujos
caption foram Locus, Alelo1, Alelo2
respectivamente
Mudei a propriedade desta banda HasChild como True. Assim criou-se uma banda Child
2- Na banda Child criada coloquei uma QRlabel, e dois QRDBText desta ordem em uma
posi��o alinhada verticalmente aos tres QRLabel colocados na banda anterior. Preenchi
o caption do QRLAbel com o nome do primeiro Locus e preenchi os QRDBText com os
DataSet e DataField correspondente a este locus
E agora no evento BeforePrint a seguinte
PrintBand := Table1.FieldByName('Alelo1').AsString <> '';
Mudei a propriedade desta banda HasChild como True. Assim criou-se uma banda Child
3- Nesta nova banda repeti os mesmos procedimento que no item 2 e assim fui repetindo
para cada locus
Observa��o: Para testar tem que compilar e executar o executavel pois fazendo o
preview direto do QuickReport nao elimina os campos vazios
Agrade�o desde ja
[As partes desta mensagem que n�o continham texto foram removidas]
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]
Links do Yahoo! Grupos
<*> Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
<*> Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
<*> O uso que voc� faz do Yahoo! Grupos est� sujeito aos:
http://br.yahoo.com/info/utos.html
