Форум: "Начинающим";
Текущий архив: 2005.12.25;
Скачать: [xml.tar.bz2];
ВнизПодскажите плз как остановить процесс передачи Найти похожие ветки
← →
JTAG (2005-12-07 11:33) [0]Ситуация такая есть программа которая передает данные в com порт в цикле. Происходит это так жму на кнопку и данные идут постоянно. Теперь хочу сделать чтобы при нажатии на туже кнопку передача останавливалась
Вот процедура обработки нажвтия на кнопку
procedure TForm1.Button12Click(Sender: TObject);
begin
if Button12.Caption= "Terminate" then
begin
Button12.Caption:= "Program";
чего сюда написать чтобы программа прекращала посылать данные
end;
Button12.Caption:= "Terminate";
while(1) do
посылаем данные
end
← →
Плохиш © (2005-12-07 11:34) [1]
> чего сюда написать чтобы программа прекращала посылать
> данные
Телепатор на профилактике, в последнне время слишком часто использовать приходиться, не справляется.
← →
Плохиш © (2005-12-07 11:36) [2]Хотя попробуем без телепатора
if Button12.Caption= "Terminate" then
begin
Button12.Caption:= "Program";
PeredatchaStojRazDwa := true;
end;
← →
JTAG (2005-12-07 11:41) [3]:)) прикольно
← →
Плохиш © (2005-12-07 11:44) [4]
> JTAG (07.12.05 11:41) [3]
> :)) прикольно
Ты смейся, смейся. Проект-то у тебя стоит.
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2005.12.25;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.03 c