 |
www.elektronik.si
Forum o elektrotehniki in računalništvu
|
| Poglej prejšnjo temo :: Poglej naslednjo temo |
| Avtor |
Sporočilo |
mucek4
Član
Pridružen-a: Sob 18 Jun 2005 20:52
Prispevkov: 2952
Aktiv.: 12.46
Kraj: Tržič - Mesto med gorami
|
 Objavljeno: Pon Jun 25, 2007 8:58 pm Naslov sporočila: |
 |
|
| Delphi je res simple. Če želiš lahko tudi mene kaj povprašaš....
|
|
| Nazaj na vrh |
|
 |
Silvo
Moderator
 
Pridružen-a: Pon 24 Feb 2003 17:09
Prispevkov: 14673
Aktiv.: 61.93
Kraj: Koroška-okolica Dravograda
|
| Objavljeno: Pon Jun 25, 2007 9:19 pm Naslov sporočila: |
|
|
| aly je napisal/a: |
Silvo, na kakšni mašini boš poganjal ta program?
386? 486?
Sodelavca sem v enem dnevu naučil programiranja v Delphiju (osnove).
Po enem tednu igranja si že skoraj profi 
Če boš imel na mašini windowse, se ti splača narediti korak naprej v to smer. Res priporočam. |
Ja vem, kar precej me je "povozil čas" a enostavno ne najdem časa, da se bil lotil nečesa drugega. A očitno se bom moral lotiti nekaj "okenskega". O Delphiju sem slišal dosti dobrega. A obstaja kaka demo ali freware verzija?.
P.S.
Zadeva, ki jo delam, naj bi bila neke vrste "semafor proizvodnje". Podatke bom predvidoma dobival s centralnega računalnika proizvodnje linije v obliki datokeke. to bom pošiljal s tvojim programom na mikrokontroler. Vmesnik bo služil za eventuelno korekcijo ter nekaj nastavitev kakih parametrov (jačina osvetlitve, nastavitev ure ....)
_________________
lp
Silvo |
|
| Nazaj na vrh |
|
|
Silvo
Moderator
Pridružen-a: Pon 24 Feb 2003 17:09
Prispevkov: 14673
Aktiv.: 61.93
Kraj: Koroška-okolica Dravograda
|
| Objavljeno: Pon Jun 25, 2007 9:21 pm Naslov sporočila: |
|
|
| mucek4 je napisal/a: |
| Delphi je res simple. Če želiš lahko tudi mene kaj povprašaš.... |
Tomaž, se priporočam - samo da vsaj malo mine gužva.(predvidoma koncem sledečega meseca)
_________________
lp
Silvo |
|
| Nazaj na vrh |
|
|
VolkD
Član
Pridružen-a: Pet 24 Sep 2004 21:58
Prispevkov: 14228
Aktiv.: 60.05
Kraj: Divača (Kačiče)
|
| Objavljeno: Pon Jun 25, 2007 9:26 pm Naslov sporočila: |
|
|
Kaj ko bi naredili izobraževalni dan ?
Silvo bo imel predavanje o picih.
Kar nekaj nas poznam, ki bi lahko predavali o delphi.
Lahko prevzamem kake RF teme.
_________________
Dokler bodo ljudje mislili, da živali ne čutijo, bodo živali čutile, da ljudje ne mislijo. |
|
| Nazaj na vrh |
|
|
jur
Član
Pridružen-a: Pet 02 Dec 2005 14:45
Prispevkov: 5142
Aktiv.: 21.70
Kraj: [color=zelena]Ljubljana[/color]
|
| Objavljeno: Tor Jun 26, 2007 3:05 pm Naslov sporočila: |
|
|
V prilogi je verzija programa, ki podpira tudi nastavitev stevila bitov/byte. V praksi se mi zdi, da take nastavitve še nikoli v življenju nisem uporabil.
Parametri za COM porte se nahajajo v device control blocku (DCB), ki zgleda tako:
The DCB structure defines the control setting for a serial communications device.
| Koda: |
typedef struct _DCB { // dcb
DWORD DCBlength; // sizeof(DCB)
DWORD BaudRate; // current baud rate
DWORD fBinary: 1; // binary mode, no EOF check
DWORD fParity: 1; // enable parity checking
DWORD fOutxCtsFlow:1; // CTS output flow control
DWORD fOutxDsrFlow:1; // DSR output flow control
DWORD fDtrControl:2; // DTR flow control type
DWORD fDsrSensitivity:1; // DSR sensitivity
DWORD fTXContinueOnXoff:1; // XOFF continues Tx
DWORD fOutX: 1; // XON/XOFF out flow control
DWORD fInX: 1; // XON/XOFF in flow control
DWORD fErrorChar: 1; // enable error replacement
DWORD fNull: 1; // enable null stripping
DWORD fRtsControl:2; // RTS flow control
DWORD fAbortOnError:1; // abort reads/writes on error
DWORD fDummy2:17; // reserved
WORD wReserved; // not currently used
WORD XonLim; // transmit XON threshold
WORD XoffLim; // transmit XOFF threshold
BYTE ByteSize; // number of bits/byte, 4-8
BYTE Parity; // 0-4=no,odd,even,mark,space
BYTE StopBits; // 0,1,2 = 1, 1.5, 2
char XonChar; // Tx and Rx XON character
char XoffChar; // Tx and Rx XOFF character
char ErrorChar; // error replacement character
char EofChar; // end of input character
char EvtChar; // received event character
WORD wReserved1; // reserved; do not use
} DCB; |
Nisem raziskoval, ampak zadeva je verjetno napisana na disku (poddirektorji Windowsa in se naloži ob zagonu sistema. Programsko je vsak parameter zelo enostavno popraviti, kar je razvidno iz programa v priponki.
Primer izklopa parnosti in nastavitev hitrosti na 9600 za COM2:
| Koda: |
hand:=createfile(PChar('COM2'),GENERIC_READ+GENERIC_WRITE,0,nil,OPEN_EXISTING,FILE_ATTRIBUTE_NORMAL,0); //pograbimo COM port in ga odpremo za branje in pisanje
If hand=INVALID_HANDLE_VALUE then begin exit; end; //ce ga ne uspemo dobiti, se program konca
getcommstate(hand,dcb); //preberemo device control block (DCB) za COM
portdcb.Parity:=noparity; //izklopimo parnost
dcb.baudrate:=cbr_9600; //COM portu nastavimo hitrost
//tu lahko nastavimo karkoli iz zgoraj navedenega DCBja
setcommstate(hand,dcb); //zapišemo device control block (DCB) nazaj v sistem |
Za tole obstoja cel kup internetnih utilitijev, podprogramov, unitov. Kljub temu se mi zdi najboljši tak način, ker naredi točno to, kar je zapisano in nič več.
Jur
| Opis: |
|
Download |
| Ime datoteke: |
commwrite_con.zip |
| Velikost datoteke: |
27.3 KB |
| Downloadano: |
10 krat |
|
|
| Nazaj na vrh |
|
|
bray
Član
Pridružen-a: Sre 19 Jan 2005 23:53
Prispevkov: 327
Aktiv.: 1.38
Kraj: Vransko
|
|
| Nazaj na vrh |
|
|
jvolk
Član
Pridružen-a: Ned 05 Mar 2006 1:14
Prispevkov: 737
Aktiv.: 3.14
Kraj: okolica Divače
|
| Objavljeno: Čet Dec 27, 2007 6:24 pm Naslov sporočila: |
|
|
bray, skoraj super program.
Prav sedaj programiram eno stvar na prenosniku, ki nima com portov. Zato sem postavil zraven še en računalnik, ki je malo počasnejši (celeron 433). Opazil sem, da je pri pošiljanju iz datoteke tvoj program počasen. Procesor nabije na 100% in seveda datoteke ne oddaja gladko ampak z zatikanjem, se pravi pošlje 3 znake, počaka, 2 znaka, počaka, 3 znake, počaka,....
Če še to popraviš bi bil super.
|
|
| Nazaj na vrh |
|
|
|
|
Ne, ne moreš dodajati novih tem v tem forumu
Ne, ne moreš odgovarjati na teme v tem forumu
Ne, ne moreš urejati svojih prispevkov v tem forumu
Ne, ne moreš brisati svojih prispevkov v tem forumu
Ne ne moreš glasovati v anketi v tem forumu
Ne, ne moreš pripeti datotek v tem forumu
Ne, ne moreš povleči datotek v tem forumu
|
Uptime: 494 dni
Powered by phpBB © 2001, 2005 phpBB Group
|
Pomoč
Išči
Seznam članov
Skupine
Statistika
Album
Filemanager
Registriraj se
Priponke
Koledar
Tvoj profil
Prijava
