Quickreport

[juniorboll]

é o seguinte eu do um monte de resultados no quickreport como endereço, cidade, estado, cep, razão social, etc, então eu quero colocar o resultado um na frente do outro tem algum tipo de alinhamento que eu posso fazer para dependendo do tamanho dos escritos aparecerem em alguma posiçao pois pode ser que um fique na frente do outro...

[Micheus]

juniorboll, você está querendo agrupar os campos, tipo colocar um após o outro como quando se escreve o endereço (rua, nº, cep, bairro ...), não utilizando colunas (posição fixas)?

[juniorboll]

isso mesmo micheus é porque se eu por altomatico quando o nome da cidade for pequeno o estado vai ficar muito longe ou senao pode ser que fique um encima do outro endende? tem como fazer?

[Progr'amador]

Olá juniorboll,

Nesse caso você poderia usar um QRLabel, e concatenar os campos.

Ex:

QRLabel.Caption := 'Rua: '+Query.FieldByName('Rua').AsString+', '+Query.FieldByName('Numero').AsString+' - '+Query.FieldByName('Bairro').AsString+' -'+Query.FieldByName('Cidade').AsString; ...

e assim por diante

Abs. Progr'amador.

[juniorboll]

programador eu estava pensando em outro jeito mas esse seu foi bem melhor pois alem de tudo minimiza o numero de componentes, gostei dessa formula sua, obrigado deu certinho...

[Micheus]

Só a título de curiosidade, também dá para utilizar o QRExpr, onde na expressão você pode testar ser há conteúdo no campo para então concatená-lo ou não - ás vezes é útil.

Utilizando parte do exemplo do colega Progr'amador:

'Rua: '+Query.FieldByName('Rua').AsString+', '+Query.FieldByName('Numero').AsString+', '+Query.FieldByName('Complemento').AsString

A menos que você teste o conteúdo do campo antes de concatenar, pode ocorrer de, se Numero estiver nulo, ficar uma lacuna estranha (em vermelho):

'Rua: Maranguape, , próximo da vendinha'

QRExpr2.Expression ficaria com:

'Rua: '+QryCliente.RUA +IF(QryCliente.NUMERO <> '', ', '+QryCliente.NUMERO, '') +IF(QryCliente.COMPLEMENTO <> '', ', '+QryCliente.COMPLEMENTO, '')

Já com nesta situação, o teste é realizado pelo componente que resulta numa concatenação mais correta. Observe que o caracter delimitador é concatenado (em verde) apenas se o campo não for nulo:

'Rua: Maranguape, próximo da vendinha'

[]s

[Progr'amador]

QRExpr2.Expression ficaria com:

'Rua: '+QryCliente.RUA +IF(QryCliente.NUMERO <> '', ', '+QryCliente.NUMERO, '') +IF(QryCliente.COMPLEMENTO <> '', ', '+QryCliente.COMPLEMENTO, '')

Já com nesta situação, o teste é realizado pelo componente que resulta numa concatenação mais correta. Observe que o caracter delimitador é concatenado (em verde) apenas se o campo não for nulo:

'Rua: Maranguape, próximo da vendinha'

[]s

Bem lembrado! Micheus, :)

Não lembrei do QRExpr, afinal fiquei mais de um ano sem ver a cor do delphi, to voltando agora, ainda to ½ enferrujado, rs! :D

Abs. Progr'amador. ;)

[juniorboll]

Otimo essa também valeu para dois, afinal nunca se sabe quando vai precisar usar um metodo diferente...