nSEdit

function nSEdit(

  win: PWINDOW;

  x: Integer;

  y: Integer;

  att: Integer;

  z: Integer;

  CursPos: Integer;

  es: shortstring;

  var ch: AnsiChar

):shortstring;