tôi đang viết một ứng dụng truyền nhận qua cổng COM trên delphi. Tôi muốn làm một cái list box liệt kê các cổng COM tồn tại trên máy tính và tình trạng của nó (có rảnh không hay là đã bị một thằng khác chiếm rồi). Bạn nào có thể giúp tôi không?
Thông báo
Collapse
No announcement yet.
làm sao biết trên máy có mấy cổng COM??
Collapse
X
-
Nguyên văn bởi plain Xem bài viếttôi đang viết một ứng dụng truyền nhận qua cổng COM trên delphi. Tôi muốn làm một cái list box liệt kê các cổng COM tồn tại trên máy tính và tình trạng của nó (có rảnh không hay là đã bị một thằng khác chiếm rồi). Bạn nào có thể giúp tôi không?
Cách 2 : click chuột phải trên biểu tượng My computer trên desktop -> properties -> hardware -> device manager -> port
Goodluck.--->
-
bác có cách nào để chương trìnhn tự động làm việc này cho mình không? ý tôi là thay vì bạn phải tự vào device manager kiểm tra rồi mới viết viết chương trình thì có cách nào để chương trình tự kiểm tra không?
Giống như chương trình Terminal của bác phamthaihoa gửi ấy. Tôi chạy chương trình này trên máy có 1 cổng COM1 => chỉ có radio COM1 được enable, chạy chương trình trên máy có 2 cổng COM => COM1 & COM2 enable. Chạy chương trình trên máy có 2 cổng COM nhưng cổng COM1 đã bị ứng dụng khác chiếm => chỉ có COM2 enable.
Rất mong các bác chỉ giáo. Tôi xin cảm ơn nhìu nhìu.
Comment
-
tôi mới tìm thấy cái này. tiếc là vẫn chưa thực hiện việc kiểm tra tình trạng của cổng được.
Code:with TRegistry.create do try rootkey:=HKEY_LOCAL_MACHINE; if keyexists('HARDWARE') then if openkey('HARDWARE',false)then if keyexists('DEVICEMAP') then if openkey('DEVICEMAP',false)then if keyexists('SERIALCOMM') then if openkey('SERIALCOMM',false)then begin GetValueNames(cmbPort.Items); for i := 0 to cmbPort.Items.Count - 1 do cmbPort.items[i] := ReadString(cmbPort.Items[i]); end finally free; end;
Comment
-
Nguyên văn bởi plain Xem bài viếttôi đang viết một ứng dụng truyền nhận qua cổng COM trên delphi. Tôi muốn làm một cái list box liệt kê các cổng COM tồn tại trên máy tính và tình trạng của nó (có rảnh không hay là đã bị một thằng khác chiếm rồi). Bạn nào có thể giúp tôi không?
Try
...
Catch
...
end try
Bạn dùng có pháp này để mở lần lượt từng cổng COM. Nếu mở được tức là nó tồn tại và còn rỗi. Còn ngược lại là bận thôi.
Comment
-
Để biết PC có mấy cổng COM , ta có thể Theo Giải thuật này (mình dùng VISUAL BASIC- nên không biết có Ích không ,nhưng POST lên , hy vọng có chút ích về GIẢI THUẬT) .
Ở đây ,mình chọn tối đa là có 4 cổng COM , sau khi KIỂM TRA ,sẽ biết được mấy cổng COMTồn Tại:
Private Function ValidatePort() As Boolean
Dim i As Integer
On Error Resume Next
ValidatePort = False
With MSComm1
For i = 4 To 1 Step -1
.CommPort = i
Err.Clear
.PortOpen = True
If (Err.Number <> 0) Then
mnuCom(i).Enabled = False
Else
ValidatePort = True
.PortOpen = False
End If
Next i
End With
End Function
Private Sub Form_Load()
If Not ValidatePort Then
MsgBox "Khong ton tai cong COM nao trong may tinh cua ban", , "Thong bao"
End
End If
End SubMy department's Website: www4.hcmut.edu.vn/~thietbidien/trangchu
Motorola-FreeScale's MCU 68HC11 & HCS12X Supporter
Comment
-
cảm ơn bác phamthaihoa và bác hoanglongu.
đoạn mã mà mình post ở trên có thể cho biết trên máy có mấy cổng COM (kể cả COM ảo, USB to COM). Mình sẽ kết hợp đoạn mã mình tìm được với kỹ thuật mà các bác hướng dẫn để phát hiện cổng COM nào đang bị chiếm. Có điều mình vẫn chưa biết cách dùng câu lệnh mà bác phamthaihoa đã chỉ ra, phải mất thêm một chút thời gian nghiên cứu nữa mới được.
chào các bác
Comment
-
Nguyên văn bởi hoanglongu Xem bài viếtĐể biết PC có mấy cổng COM , ta có thể Theo Giải thuật này (mình dùng VISUAL BASIC- nên không biết có Ích không ,nhưng POST lên , hy vọng có chút ích về GIẢI THUẬT) .
Ở đây ,mình chọn tối đa là có 4 cổng COM , sau khi KIỂM TRA ,sẽ biết được mấy cổng COMTồn Tại:
Comment
-
Nguyên văn bởi duong_act Xem bài viếtLaptop bây giờ ko có USB=> COM thì làm gì còn COM nữa .
Comment
-
Nguyên văn bởi tranthangbk Xem bài viếtem thấy trên laptop vẫn có 1 cổng có 25 chân. thường để cắm ra máy chiếu, vậy đấy là công j vậy ak?
Comment
-
Nguyên văn bởi tranthangbk Xem bài viếtem thấy trên laptop vẫn có 1 cổng có 25 chân. thường để cắm ra máy chiếu, vậy đấy là công j vậy ak?
nếu là 25 chân là lpt, cổng song song cho máy in.
nếu là 15 chân là vga, cổng video gắn cho màng hình rời.Mãi đi tìm vàng.
Comment
Bài viết mới nhất
Collapse
-
Trả lời cho Yêu thơ mê nhạc, mời các bác vào đây!bởi dinhthuong92Dạ, cảm ơn bác chỉ cặn kẽ. Vậy thêm một dấu giáng như dưới là ổn phải không bác nhỉ, nó có là fa thứ Fm được không?...
-
Channel: Tâm tình dân kỹ thuật
hôm nay, 11:24 -
-
Trả lời cho Yêu thơ mê nhạc, mời các bác vào đây!bởi vi van phamTôi đoán bác nhathung1011 nói sai chỗ này:
- Đầu tiên cháu viết nhạc , bản nhạc khóa sol không thăng, không giáng, nốt kết thúc là nốt do thì bản nhac đó thuộc ton Đo trưởng. Đúng lý thuyết nhạc lý.
- Cháu sửa lại nốt nhạc...-
Channel: Tâm tình dân kỹ thuật
hôm nay, 10:32 -
-
Trả lời cho Yêu thơ mê nhạc, mời các bác vào đây!bởi dinhthuong92Vâng, xin được nói lời cảm ơn vì bác đã bỏ chút thời gian rảnh rỗi quí báu vào đây xem thử và nhiệt tình cho ý kiến.
Đã trót vào và thấy sai rồi thì bác mạnh dạn, ngại gì không chỉ ra giúp cái nốt sai ấy để tác giả sửa...-
Channel: Tâm tình dân kỹ thuật
Hôm qua, 16:46 -
-
bởi nhathung1101Wrong translate! I don't care!
-
Channel: Điện tử dành cho người mới bắt đầu
14-05-2024, 17:52 -
-
Trả lời cho Kiểm tra biến ápbởi nhathung1101Tôi viết bài này để anh em hiểu:
Cái loại Cty không có thiết bị chuyên dùng thì chỉ sang Tề Lỗ (Vĩnh Phúc) hoặc Văn Môn (Hưng Yên).
Vớ vẩn đừng trình bày....-
Channel: Điện tử dành cho người mới bắt đầu
14-05-2024, 17:42 -
-
Trả lời cho Kiểm tra biến ápbởi nhathung1101Ở trên Tề Lỗ (Vĩnh Phúc) có dịch vụ này mà. Họ cắt đôi ra rồi đếm. Hoặc tách ra rồi cân.
-
Channel: Điện tử dành cho người mới bắt đầu
14-05-2024, 17:37 -
-
Trả lời cho Yêu thơ mê nhạc, mời các bác vào đây!bởi nhathung1101Lão lại bảo thủ. Giờ giới trẻ chơi 4/5 cơ.
Nó pha tạp thành "đít cô cha" còn gọi sang chảnh là Ca bóp hay Cu bóp gì đó hay đít ...
ha ha... Già rồi không thưởng nổi.
Chứ làm gì còn thời chúng ta chứ!
...-
Channel: Tâm tình dân kỹ thuật
14-05-2024, 17:27 -
-
Trả lời cho Máy ảnh máy tính xách tay không hoạt độngbởi pia2k1Mang quán quán sửa ngta xem cho bạn ạ...
-
Channel: Camera và xử lý ảnh
14-05-2024, 13:45 -
-
Trả lời cho Kiểm tra biến ápbởi bqvietNgười tàu bán máy này sang VN nhiều phết, ví dụ hàng của hãng GainKaiTa gì đó đủ loại từ đơn giản tới phức tạp
http://en.gkt.com.cn/
Kiểu 3259 cũ chẳng hạn, nhiều tính năng mà vẫn tương đối nhỏ gọn.-
Channel: Điện tử dành cho người mới bắt đầu
13-05-2024, 00:15 -
-
bởi lamvu0677Chào mọi người, e làm trong cty về biến áp , toàn mấy con nhỏ nhỏ, làm sao để mình có thể kiểm tra nhanh số vòng dây của mỗi cuộn , đầu vào đầu ra của dây, có thiết bị gì nhỏ gọn hỗ trợ việc này không ạ , xin cảm ơn...
-
Channel: Điện tử dành cho người mới bắt đầu
12-05-2024, 07:15 -
Comment