Identificar Porta serial Dispon�vel

Question

Pessoal, como fa�o para Identificar porta serial disponivel no PV via porgrama��o em Delphi. Exemplo quando abrir o programa ele ache
uma porta para se conectar. Eu uso os componente Comport e Mscomm.

Grato
Juarez

Aroldo Zanela · Answer

Colega,Fa�a um for de acordo com a quantidade de portas dispon�veis no PC e tente abr�-la.Exemplo hipot�tico:[code:1:d987da7356]for I := 1 to 4 do if OpenX(Com+IntToStr(I)) then  break;[/code:1:d987da7356]Deve-se usar blocos try...except para tratar as exce��es....

Juarezber · Answer

Zanela, como eu criaria OpenX e Com ?GratoJuarez...

Massuda · Answer

Acredito que a inten��o do Aroldo era dar uma id�ia de como fazer, n�o dar um c�digo que funcionasse.

No caso, a sugest�o que ele deu � que voc� deve tentar abrir a porta serial para ver se ela existe. Eu geralmente tento abrir as portas COM1 a COM8 e testo quais portas s�o modem (o teste � simples: envie AT e se receber um OK � porque a porta est� ligada a um modem).

Rodc · Answer

As portas seriais ativas no Windows ficam no Regedit, no caminho �HKEY_LOCAL_MACHINEHardwareDeviceMapSerialComm�....

Juarezber · Answer

Rodc, valeu a dica, mas o que eu estou precisando � deum exemplo de como fazer via programa��o em delphi.Abra�osJuarez...

Rodc · Answer

Voc� quer saber como acessa o Regedit ou a Porta Serial?Para acessar o Registry v� no Help do Delphi e pesquise a classe TRegistry, � ela que faz o acesso ao Registry do Windows....

Juarezber · Answer

A porta serial.GratoJuarez...

Aroldo Zanela · Answer

[quote:024797a6ab=�juarezber�]Rodc, valeu a dica, mas o que eu estou precisando � deum exemplo de como fazer via programa��o em delphi.Abra�osJuarez[/quote:024797a6ab]Colega,Veja se � isto que est� procurando:[code:1:024797a6ab]function TestaPortaCom(Porta: string): Boolean;var F: file;begin  {$I-}  AssignFile(F, Porta);  FileMode := 0;  Reset(F);  CloseFile(F);  {$I+}  TestaPortaCom := (IOResult = 0) and (Porta <> ��);end;[/code:1:024797a6ab]...

F�rum Identificar Porta serial Dispon�vel #335198