안녕하세요?
Comport 를 Getcomport(팁에서)를 사용했는데요,
Com1~9까지는 잘 찾는데, COM10 이상 포트는 찾질 못하네요...
아시는분 도와주세요...
var comfile : file;
for Index := 20 downto 1 do // COM1부터 COM20까지 검색
begin
{$I-}
AssignFile(ComFile, 'COM' + IntToStr(Index));
Reset(ComFile);
CloseFile(ComFile);
{$I+}
sleep(10);
if IOResult = 0 then // COM포트가 사용가능하다면
begin
portarray[Index] := true;
end;
end;//for
이렇게 했는데요.... Com 10 부터 그이상 두자리 포트는 찾질 못하네요..
어떻게 해야 할지.... 도와주세요..
감사합니다.
그런데, ValidGetcomport 는 사용 가능한 두자리 컴포트를 못찾네요..
감사합니다.