Re: Komunikacija racunara sa drugim uredjajem?Citat:
MojeKorisnickoIme:
1Sve sam uspeo samo sad jedino imam problem u tome sto ako ukljucim 2 aplikacije u isto vreme druga koju ukljucim mi izbacuje erorr Port already open
2Drugi problem
Do
MSComm1.Output="123123123"
Loop
Mi kresuje VB
Citat:
shpiki:
Pitanje je malo vise za neki forum sa programskim jezicima, ali pokusacu:
(ne znam Delphi, moze VB?)
Prvo, da li je COM1 ili COM2 nema apsolutno nikakve veze, program je isti.
Drugo, kontrolisu se RTS, DTR i TxD (to se vidi sa slike).
u VB 6.0 postavis MSComm controlu, podesis .Port na COM1 (rekao si da ti taj treba?),
brzina ti nije bitna (jer nema standardne komunikacije), ali je potrebno da postavis .Settings properties na "9600,n,8,1" (sa sve navodnicima; standard).
Zatim radis MSComm1.RTSEnable=True/False i MSComm1.DTREnable=True/False, a za TxD jednostavno izbacis nesto na izlaz tipa MSComm1.Output="123123123". Fazon je da non-stop saljes nesto na izlaz da bi ti TxD pin bio "HIGH" (naravno da nije non-stop high, ima prelaze low-high low-high jer saljes, ali sto veci baudrate veca brzina promene low-high...).
Nadam se da sam bio jasan. Pozdrav.
Pitanje je malo vise za neki forum sa programskim jezicima, ali pokusacu:
(ne znam Delphi, moze VB?)
Prvo, da li je COM1 ili COM2 nema apsolutno nikakve veze, program je isti.
Drugo, kontrolisu se RTS, DTR i TxD (to se vidi sa slike).
u VB 6.0 postavis MSComm controlu, podesis .Port na COM1 (rekao si da ti taj treba?),
brzina ti nije bitna (jer nema standardne komunikacije), ali je potrebno da postavis .Settings properties na "9600,n,8,1" (sa sve navodnicima; standard).
Zatim radis MSComm1.RTSEnable=True/False i MSComm1.DTREnable=True/False, a za TxD jednostavno izbacis nesto na izlaz tipa MSComm1.Output="123123123". Fazon je da non-stop saljes nesto na izlaz da bi ti TxD pin bio "HIGH" (naravno da nije non-stop high, ima prelaze low-high low-high jer saljes, ali sto veci baudrate veca brzina promene low-high...).
Nadam se da sam bio jasan. Pozdrav.
1Sve sam uspeo samo sad jedino imam problem u tome sto ako ukljucim 2 aplikacije u isto vreme druga koju ukljucim mi izbacuje erorr Port already open
2Drugi problem
Do
MSComm1.Output="123123123"
Loop
Mi kresuje VB
Mislim da sam otkrio kako da resim problem 1 tako sto moram da naucim VB pa da recimo ako mi je ukljucen RTSon i hocu da ukljucim DTRon Moram da dodam komandu u DTRon tipa
If RTSon then close RTSon and Run (sad napravim nov program RTSDTRon) if not just run DTRon
A problem 2 je ja mislim u tome sto slogiram kompijuter posto saljem non stop podate bez imalo zastoja tj verovatno treba da ubacim neki usporivac (tajmer)
