Salvar o codigo com ZERO na frente

Question

Bom Dia Galera!!!Como fa�o0 para salvar o codigo de um registro com 0 na frente.Ex: em vez se salvar 1-2-3-4-5-6-7-8-9-10 Salvar ent�o 01-02-03-04-05-06-07-08-09-Algu�m pode  me dar uma dica?Desde j� ...

Beckert · Answer

[quote:8c9f611564=�lsksskyblu�]Bom Dia Galera!!!Como fa�o0 para salvar o codigo de um registro com 0 na frente.Ex: em vez se salvar 1-2-3-4-5-6-7-8-9-10 Salvar ent�o 01-02-03-04-05-06-07-08-09-Algu�m pode  me dar uma dica?Desde j� eu agrade�o!!![/quote:8c9f611564]=================================if edit1.text[1] <> �0� then Edit1.text := �0� + Edit1.text;...

Brunodsr · Answer

Vc pode criar uma fun��o parecida com essa que segue abaixo:

procedure TForm1.Button1Click(Sender: TObject);
begin
Edit1.text := f_replicate(Edit1.text,5);
end;

function TForm1.f_Replicate(Str: String; tamanho: Integer): String;
begin
result := Trim(Str); //Retirando os espa�os em branco
repeat
Result := �0�+result;
until
Length(result) >= tamanho;
end;

A fun��o vai colocar quantos zeros vc quiser, dependendo do tamanho do seu campo (eu fixei em 5 = 99999)

Espero ter ajudado

Lsksskyblu · Answer

Cara Deu certo mas na hora de eu salvar ele s� armazena no DBEdit mas quando vou localizar esse registro ele amostra o c�digo sem os zeros.O que pode ser isso?...

Joaoshi · Answer

Colega, se o field for um tipo numero , integer, float, se n�o for string n�o vai gravar....

Lsksskyblu · Answer

Caro Amigo joa�Shi esse meu field � d� tipo integer pois salvo o c�digo do registro ,como eu fa�o para mudar para string se for possivel ,Desde j� lhe agrade�o!!!!...

Joaoshi · Answer

Colega, se � s� para ficar alinhado voc� poderia utilizar a propriedade do TField DisplayFormat, acredito que seria a solu��o com menor esfor�o.Espero ter ajudado....

Paulo · Answer

Concordo com o joaoshi e tem mais. Vai mudar de Integer para String, e se vc tiver algum c�lculo com esse campo, vai tudo pro belel�u, e ademais, em banco de dados se tem que ser integer, ent�o tem ser, sen�o vai ficar dando Cast � toa, o que torna seu banco inconsistente. Se for para aparecer no banco, deixa como est�. Essas fun��es, no aplicativo, funciona do jeito como vc quer. Quanto a aprecer no banco, so vc vai ver e o admin de banco caso haja.

Martins · Answer

[quote:81a8f7d063=�joaoshi�]Colega, se � s� para ficar alinhado voc� poderia utilizar a propriedade do TField DisplayFormat, acredito que seria a solu��o com menor esfor�o.Espero ter ajudado.[/quote:81a8f7d063]Concordo com vc, eu deixaria o banco com est� e faria a formata��o apenas para exibi��o dos dados....

Lsksskyblu · Answer

Caro martins e como fa�o essa formata��o?...

Martins · Answer

[quote:d180db2278=�lsksskyblu�]Caro martins e como fa�o essa formata��o?[/quote:d180db2278]Usando o DisplayFormat como j� mencionado pelo colega [b:d180db2278]Jaoshi[/b:d180db2278][b:d180db2278]TField -> DisplayFormat[/b:d180db2278]....

Brunodsr · Answer

Mudar o tipo da coluna para texto nao influencia tanto na velocidade de busca, contanto que exista um indice para o campo. Isso dai vai depender da quantidade de registros que vc tem na tabela.

Se o seu problema for apenas exibi��o, n�o perca tempo com isso. N�o vale � pena. Qndo o seu banco chegar a mais de mil registros, essa tua mascara vai furar. Ou vc vai querer exibir 00001?? Acho que n�o!!

Se o seu problema � exibir o campo em relat�rios ou de forma organizada em tela, sugiro que vc apenas alinhe os campos num�ricos � direita. Assim vc pode evitar bagun�as. Ex.:

Codigo
1
2
10
21
99
.....
........

Espero ter ajudado.

Paulo · Answer

[quote:2b79ac18e5]Caro martins e como fa�o essa formata��o?[/quote:2b79ac18e5]Se os seus campos estiverem no FieldsEditor, ent�o de um duplo clique no seu componente, selecione o Field e na propriedade no Object Inspector, escolha o Display Format e coloque l� a sua m�scara....

Martins · Answer

[quote:8ea0608f3b=�Paulo�][quote:8ea0608f3b]Caro martins e como fa�o essa formata��o?[/quote:8ea0608f3b]Se os seus campos estiverem no FieldsEditor, ent�o de um duplo clique no seu componente, selecione o Field e na propriedade no Object Inspector, escolha o Display Format e coloque l� a sua m�scara.[/quote:8ea0608f3b]� isso mesmo [b:8ea0608f3b]Paulo[/b:8ea0608f3b]. Eu acredito q ele deveria fazer assim.[quote:8ea0608f3b=�brunodsr�]Se o seu problema for apenas exibi��o, n�o perca tempo com isso. N�o vale � pena. Qndo o seu banco chegar a mais de mil registros, essa tua mascara vai furar. Ou vc vai querer exibir 00001?? Acho que n�o!! [/quote:8ea0608f3b]Pelo visto ele quer q os n�meros 1..9 fiquem 01..09, j� do 10 em diante, normal. Pelo menos foi isso q deu para entender pelos exemplos dados por ele....

Pestana_ · Answer

utilize o [b:3814e81f21]Display Format[/b:3814e81f21] como j� foi mensionado.

Dependendo da situa��o utilize o [b:3814e81f21]Format[/b:3814e81f21]

Format(��2.2d�, [valor];

flw.