Manejo de Archivos en Smalltalk V y Express

1 - Para crear un archivo de salida:
  File newFile: nombreArchivo

  Ejemplo: 
  | archi |
  archi := File newFile: ' c:\ pruebas.txt'.  
   
2- Para cerrar un archivo de salida:
  NombreArchivo close

  Ejemplo:
  | archi |
  archi := File newFile: ' c:\ pruebas2.txt'.
  archi close  


3- Para guardar datos en un archivo:
  nombreArchivo nextPutAll: dato

  Ejemplo: 
  | archi |
  archi := File newFile: ' c:\ pruebas2.txt'.
  archi nextPutAll:'Esta es una prueba'; cr.  
  archi close  

4- Para guardar datos en un archivo, desde una colección:
nombreArchivo nextPutAll: coleccion

Ejemplo:

| archi col col2|
archi := File newFile:'c:\prueba.dat'.
archi nextPutAll:'Este es mi archivo de prueba';cr.
col := #( 1 2 3 4 5).
col do:[ :k | archi nextPutAll: k printString ;cr].
col2 := #( $A $B $C).
archi nextPutAll: col2.
archi close.


5- Para leer un archivo:
File pathName: nombreArchivo

Ejemplo:

| archi col |
archi := File pathName:'c:\prueba.dat'.
col := archi contents.
archi close.
^col

SOLO EN SMALLTALK EXPRESS

1 - Para determinar si un archivo ya existe :
File exists: nombreArchivo
Ejemplo:

File exists: 'c:\personal.dat'
File exists:'c:\prueba.dat'


2 - Para guardar los datos de una colección en un archivo:

ObjectFiler dumpAll: coleccion newFile: nombreArchivo

Ejemplo:
| col |
col := #( 1 2 3 4 5).
ObjectFiler dumpAll:col newFile: 'c:\datos.dat'.



3- Para cargar datos en una colección desde un archivo:
ObjectFiler loadAllFromPathName: nombreArchivo

Ejemplo:
| coldat |
coldat := ObjectFiler loadAllFromPathName: 'c:\datos.dat'.
^coldat