ASM51

Boa noite.

Estou começando a programar em Delphi e preciso comunicar com um equipamento via porta serial.
São vários comandos diferentes que precisam ser interpretados e colocar a informação em labels.
Já consegui fazer a comunicação utilizando o componente TComport e associando cada comando a um botão. Funciona perfeitamente!!!
O problema é que preciso enviar todos os comandos sequencialmente para que não precise apertar um botão de cada vez, mas sim somente um que realize todo o ciclo.
Preciso:
1) selecionar a string do comando;
2) transmitir o comando;
3) verificar se houve timeout;
4) desmembrar a rotina recebida com o comando COPY(já operacional);
5) colocar no local certo a informação
6) repetir o processo até o ultimo comando.

Tenho que executar 5 botões com essa sequência descrita acima.
Não consegui fazer em Delphi porque ainda não entendi com fazer:
FOR COMANDO 0 TO 10
BEGIN
WHILE NOT FLAG_TUDO_OK DO; // AGUARDA A PORTA SERIAL RECEBER O VALOR PARA QUE POSSA TRATAR E CONTINUAR O PROCESSO
INTERPRETA O RESULTADO DA SERIAL
EXECUTA O COMANDO
END;
END;
O problema é que o DELPHI trava durante o WHILE ... DO.
Isso funciona perfeitamente nos uC!!!
Qualquer ajuda é muito bem vinda, pois já estou quebrando a cabeça há dias!!!

Obrigado.

Vibrex.

Ou usa thread ou timer event.
Não deixe um programa em LOOP, colocado dentro do loop a seguinte função

application.processmessages;

Que tal usar a lib da marshallsoft, que tem serialização por interrupt ?

tcpipchip

Obrigado por responder!
Não tenho essa LIB.
Você poderia indicar onde posso encontrar mais informações ou exemplos?
Você já fez algum programa utilizando esse recurso?

Mais uma vez,, obrigado.

O componente Tcomport trabalha com thread .
Você pode usar um truke comum que é deixar um TMemo invisivel com a largura da string que você vai usar,assim o memo vai recebendo e pulando as linhas automaticamente,você só tem que verificar cada linha do memo e pegar o dado que quiser.
Faça também a verificação da quantidade de linhas que o memo terá,assim voce executa um Memo.clear,pois o memo tem limitação de memória.
Um exemplo genérico;

1) selecionar a string do comando;

Usando o Memo seria,tipo,if Memo1.Lines.Strings[0]=

Haveria a possibilidade de você enviar um exemplo de programa, pois estou começando agora e sinto certa dificuldade.
Eu tenho que executar 5 listas com 10 comandos pela porta serial.
Muito obrigado pela sua atenção.

Oque voce ja tem programado?

Eu estou fazendo uma interface para calibrar um equipamento, utilizando comunicação serial.
A interface deverá gerar sinais senoidais, medir tensões positivas e negativas, e medir frequência (<5kHz).
Estou utilizando o Arduíno Leonardo como interface e comprei um módulo DDS AD9850 na China.

Abraço.

André.