Hola de nuevo.
Claro...
Estabas declarando:
Código Delphi
[-]
type
TdmNrComm = ...
procedure OnAfterReceive(Com: TObject; Buffer: Pointer; Received: Cardinal);
...
Y luego definiendo:
Código Delphi
[-]
procedure TdmNrComm.ComPortAfterReceive(Com: TObject; Buffer: Pointer; Received: Cardinal);
...
Presté atención en mi código, pero juro que se me escapó leyendo el tuyo, disculpas
Saludos