Re: [delphi-br] Calculo CRC

2009-09-02 Por tôpico LEONARDO MOREIRA ALVES
Cara, se vc quiser acho que vc deve dar uma olhada neste codigo em BASIC para PIC. Com ele dá para fazer uma melhor aproximação para o Pascal. symbol CRCPOLY = $1021 ' CRC-CCITT symbol CRC = w0 ' CRC Word symbol Lo_CRC = b0 ' CRC Lo_Byte symbol Hi_CRC = b1 ' CRC Hi_Byte ' -[ Subrou

[delphi-br] OT - Empresa Desenvolvedora em Delphi

2009-07-22 Por tôpico LEONARDO MOREIRA ALVES
Olá a todos. Desculpe está mensagem Off-Topic, mas preciso da ajuda do grupo. Trabalho em uma Empresa de equipamentos eletrônicos e estamos desenvolvendo um sistema de monitoramento remoto via TCP/IP. Por isso estamos procurando empresas, de preferência no estado de SP, que tenham experiência no

Re: [delphi-br] Como enviar um pulso de 5 volts pela serial?

2009-02-19 Por tôpico Leonardo Moreira Alves
steira la atras heheheheh, > Mas vivendo e aprendendo > Mas garanto que na parelala, vc acende um LED com facilidade > []s > > Luiz Escobar > > From: Leonardo Moreira Alves > Sent: Wednesday, February 18, 2009 9:17 PM > To: delphi-br@yahoogrupos.com.br > Subject: Re:

Re: [delphi-br] Como enviar um pulso de 5 volts pela serial?

2009-02-18 Por tôpico Leonardo Moreira Alves
Viu pessoal na Saida Serial você não tem 5V, e sim 12V e -12V vc precisa de um conversor serial para trabalhar com 5V Sugiro a utilização da Porta Paralela, é mais fácil e mais simples... além de que tem 5V. Abraços At 11:18 18/2/2009, you wrote: >Use WriteFile pois a porta COM (Serial) é >

Re: [delphi-br] Re: Duvida com o TOpenDialog.

2009-02-18 Por tôpico Leonardo Moreira Alves
Este código abaixo funcionou... Valeu pela ajuda procedure TForm1.Button1Click(Sender: TObject); var caminho : String; begin caminho := ExtractFilePath(ParamStr(0)); Edit1.Text := caminho; OpenDialog1.InitialDir := ExtractFilePath(ParamStr(0)); OpenDialog1.Execute; end; end. At 17:21 17/2/2