Pascal/Turbo Pascal - Hundir la flota

   
Vista:

Hundir la flota

Publicado por Flash (3 intervenciones) el 09/04/2008 16:50:27
Hola, me gustaria saber si alguien sabe como dibujar un tablero teniendo una declaracion de tipos de la siguiente manera:

TDireccion= (N,S,E,O);
TFilas= 1..filas;
TColumnas= 1..columnas;
TCasilla= (nodescubierta,conagua,conbarcotocado);
TTablero= array [TFilas,TColumnas] of TCasilla;
TDisparo= (agua,tocado,hundido);
TBarco= record
columna: integer;
fila: integer;
dir: Tdireccion;
longitud: integer;
end;
TInfoBarco= array [1..num_barcos] of TBarco;
TPartida= record
tablero: TTablero;
flota: TInfoBarco;
numDisparos:integer;
end;

Ya que yo tenia el TTablero como of char y si sabia dibujarlo, pero ahora al cambiarlo no consigo dibujarlo; alguien sabe???

Gracias
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder