Strncpy ()

Library "libc:6"

' char *strncpy (char *__restrict __dest, const char *__restrict __src, size_t __n)
' Copy no more than N characters of SRC to DEST.
Private Extern strncpy(__dest As Pointer, __src As Pointer, __n As Long)


Public Sub Main()
 
 Dim p1, p2 As Pointer
 
  p1 = Alloc("abcdefghil")
  p2 = Alloc(4)
 
' Copia nell'area di memoria, puntata dal Puntatore del 1° argomento, i soli primi 4 byte dell'area di memoria puntata dal Puntatore del 2° argomento.
  strncpy(p2, p1, 4)
  
  Print String@(p2)
   
  Free(p2)
  Free(p1)
  
End

Pagina in costruzione !