Fórum Ajuda a um iniciante #464154

16/12/2013

0

Delphi

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

Responder

Posts

16/12/2013

Marcos Oliveira

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
Responder

Gostei + 0

16/12/2013

Jorge Leite

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
Responder

Gostei + 0

16/12/2013

Wesley Yamazack

Opa Jorge, bacana a ideia hein?

Ficamos no aguardo para analisarmos :)

abs
Responder

Gostei + 0

16/12/2013

Jorge Leite

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
Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar