wenn es nur ein char ist mach es mit postmessage ist besser

PostMessage(<festerhandle>,WM_USER+X,NULL,CHAR);

im Form dann muß du die Funktion des Message handler über schreiben


Code:
procedure AppMessages(var Msg: Tmsg; var Handled: Boolean);
....
procedure TMainForm.AppMessages(var Msg: Tmsg; var Handled: Boolean);
// Eigener Messages Handler
begin
  if not Handled then
  begin
    if Msg.message = WM_USER+X then
    begin
      HandleBuffer(Msg.lParam);
      Handled := true;
    end;
  end;
end;
Gruß