| changeset 6903 | 5f66f3d3e131 |
| parent 6902 | 7d4e5ce73b98 |
| child 6982 | 8d41d22a291d |
| 6902:7d4e5ce73b98 | 6903:5f66f3d3e131 |
|---|---|
231 end; |
231 end; |
232 |
232 |
233 procedure SendIPCc(c: char); |
233 procedure SendIPCc(c: char); |
234 var s: shortstring; |
234 var s: shortstring; |
235 begin |
235 begin |
236 s[0]:= #0; |
236 s[0]:= #1; |
237 s[1]:= c; |
237 s[1]:= c; |
238 SendIPC(s); |
238 SendIPC(s); |
239 end; |
239 end; |
240 |
240 |
241 procedure SendIPCRaw(p: pointer; len: Longword); |
241 procedure SendIPCRaw(p: pointer; len: Longword); |