Ajuda a um iniciante

Delphi

16/12/2013

Amigos, estou precisando fazer um demo, onde tenho que digitar um numero de Nota Fiscal e um Numero Volume, depois preciso juntar os dois números e criar um terceiro chamado serial com 24 caracteres e preencher com zero a esquerda até totalizar 24 caracteres.

Alguem pode me ajudar ?
Grato.
Jorge Leite

Jorge Leite

Curtidas 0

Respostas

Marcos Oliveira

Marcos Oliveira

16/12/2013

Jorge, fiz da seguinte forma:

Edt_Serial.Text := StringOfChar('0',24 - Length(Edt_Nota.Text + Edt_Volume.Text)) + Edt_Nota.Text + Edt_Volume.Text;


No meu caso, coloquei 3 edits, sendo um para receber o resultado, uma onde foi informada a nota e outra o volume.
Creio que isso irá te ajudar.

Att,

Marcos
GOSTEI 0
Jorge Leite

Jorge Leite

16/12/2013

Ok, meu amigo vou testar agora.
Muito obrigado por sua atenção.

Este é um demo para leitura de RFID. assim que tiver pronto posto aqui no forum
GOSTEI 0
Wesley Yamazack

Wesley Yamazack

16/12/2013

Opa Jorge, bacana a ideia hein?

Ficamos no aguardo para analisarmos :)

abs
GOSTEI 0
Jorge Leite

Jorge Leite

16/12/2013

Opa Jorge, bacana a ideia hein?

Ficamos no aguardo para analisarmos :)

abs


Voce é aqui do Rio ?
pode enviar seu e-mail ?
Ou melho como faço para entrar em contato com vc
GOSTEI 0
POSTAR