CommPortThe CommPort property specifies the communications port number. A numeric property that corresponds to the Comm port. By default, this property is set to 1 corresponding to com1. Valid values are 1, 2, 3, or 4 depending on the serial ports installed on the computer and their configuration.
SettingsThe Settings property configures the baud rate, parity, data bits, and stop bits for the serial port. The Settings property is a character string that contains individual comma-separated values. By default, the Settings property is as follows:
The following baud rate values are valid: 110, 300, 600, 1200, 2400, 4800, 9600 (default), 14400, 19200, 28800, 38400, 56000, 57600, 115200, 128000, 256000.
PortOpenThe PortOpen property specifies a logical value that controls whether or not the serial port is open and active. Once the previous properties are set to begin using the serial port, you can set this property to true.
OutputThe Output property is assigned the string of characters to be sent to the serial port. To output the string "Hello World" to the serial port after the previous properties are set, use the following command:
myform.mycomm.output = "Hello World"
CommEventThe CommEvent property contains a value that represents the most recent communications event or errors.
SthresholdThe Sthreshold property specifies the minimum number of characters in the output buffer that are sent.
OutBufferCountThe OutBufferCount control returns the number of characters waiting in the transmit buffer. This should always be zero if the Sthreshold property is zero. Setting the OutBufferCount property to zero will clear the transmit buffer.
OutBufferSizeThe OutBufferSize property specifies the size of the transmit buffer. By default, this buffer is 512 bytes. The larger the transmit buffer, the less memory available to other applications. Slow baud rates and large text strings written to the serial port may mean you need to make this value larger.
Following is a sample that shows how to set up the comm control and dial the phone number 555-1234 by using the standard Hayes Modem commands.
ComForm = CREATEOBJECT('Form')
ComForm.Testcom.CommPort = 2 && Use Comm2, The second Serial Port.
ComForm.Testcom.Settings = "14400,N,8,1" && 14.4 Kbaud, No Parity,
&& 8 data Bits, 1 Stop Bit
ComForm.Testcom.PortOpen = .T.
ComForm.Testcom.Output = "ATDT555-1234" + chr(13) && Dialing the number
* The chr(13) is needed to complete the modem command sequence
ComForm.Testcom.PortOpen = .F.
***** End Code *****
ID članka: 139526 – Zadnji pregled: 20. jun. 2008 – Revizija: 1