TSimpleIPCServer
pl
OnMessage
TSimpleIPC
TComponent
TPersistent
TObject