TEditorSetString = packed record StringNumber: integer; StringText: PChar; StringEOL: PChar; StringLength: integer; end; PEditorSetString = ^TEditorSetString;