Hola Egostar.
Ya lo de comparar los hex que manda el micro quedo resuelto de esta manera.
Código Delphi
[-]
procedure TForm1.ComPortRxChar(Sender: TObject; Count: Integer);
var
Str: String;
begin
ComPort.ReadStr(Str, Count);
AddHexString(Str,Memo.Lines);
if length(Str)>= 8 then
if Str = 'Hi-LOGIC' then
showmessage('¡OK! ¡ES ORIGINAL!')
else
showmessage('¡HORROR!, ¡ES PIRATA!');
end;
Aqui contamos la cadena y esperamos que sean 8 los caracteres, luego comparamos que sean los deceados lo cual nos dara una respuesta y de no ser iguales pues el resultado adecuado.
Ya el serial port y el comport los estoy entendiendo un poco mejor gracias a tu ayuda y la del amigo FGarcia.
Un Saludo.