Fórum Como preencher com zeros antes de cada coluna, via select #194752

Olá!
Tenho uma tela que cotém um DBGrid de 3 colunas numéricas.
Preciso fazer um select que concatene estas 3 colunas e grave o resultado em um arquivo.
Sendo que a col1 deve ter 2 caracteres, a col2 deve ter 4 e a col3 deve ter 3.
Se, por exemplo, na col2 tiver um número 47, deve ser preenchido com zeros, ficando 0047. Deve ser sempre preenchido com zeros antes, para os caracteres menores que 2 na col1, 4 na col2 e 3 na col3.

No Oracle existe uma maneira de fazer, que ficaria assim:

select lpad(col1,2,0)||lpad(col2,4,0)||lpad(col3,3,0) from tabela

mas infelizmente o Delphi não aceita o comando ´lpad´, aceita somente o de concatenação ´||´.


Alguém tem alguma idéia de como fazer isto, através de um select ???


Desde já agradeço.