[Barsdg]

Доброго времени суток уважаемые!
Есть родная программа для сбора данных с Com1
Я пишу программу, которая должна конектиться к Com1 и послать команду 'MEAS80'. Команда прибором отрабатывается.
procedure TForm1.Button6Click(Sender: TObject);

var
Str: String;
begin
ComPort1.Open;
Str := 'MEAS80';
Str := Str + #13;
ComPort1.WriteStr(Str);
ComPort1.Close;
end;

НО родная программа после этого с Com1 данные не выгружает.

Пробовал через HyperTerminal:
HyperTerminal -> команда "MEAS" -> Результат ОК -> Disconnect
Далее в родной программе данные грузятся без проблем! В чем может быть проблема???

[NumLock]

может после отправки команды стоит попробоать принять что-то с порта (ответ)? хотя бы в течении какого-нибудь таймаута.

[Barsdg]

Дело в том, что прибор соединенный к СОМ1 уже получил себе в память данные, теперь требуется в РОДНОЙ программе - вытащить данные, но (я так понимаю) она не может соединиться с СОМ1, после пользования портом моей программы. ИЛИ я что-то не до понимаю!

Есть ли у кого нибудь листинг программы похожий на HyperTerminal виндовый???

[NumLock]

родная программа читает данные только после отправки из себя или постоянно их ждет? какой Share Mode используется?

[Barsdg]

На приборе есть кнопка при нажатии которой приходит процесс сканирования шероховатости и сохранения данных к себе (в прибор) в память прибора. Далее в родной проге есть кнопка при нажатии которой, данные с прибора загружаются в нее.

Так вот мой выше описанный код имитирует нажатие кнопки на самом ПРИБОРЕ, но если я проделываю это не физически, а через мой код, то Родная прога не грузит данные, и выдает сообщение:
http://www.delphisources.ru/forum/at...d=134623615 1
Такое же сообщение появляется когда Родная программа пытается загрузить данные, а прибор Выключен.

Share Mode - не понял вопроса...?

[NumLock]

а при использовании HyperTerminal, после отправки команды из него, в родной программе кнопку нажимаешь чтобы получить данные из прибора? или программа сразу же получает данные?