Club Builder

[Antonio]

Soy un inexperto en el c++ builder, por lo q mi programa puede q sea deficiente, espero vuestra ayuda.
Tengo el siguiente programa q me debe crear un fichero de texto y escribo una serie de cosas en ese fichero. He creado una funcion imprimir que escribe en el fichero, pero no me fio mucha de ella.
Consigo crear el fichero, pero sin embargo no me escribe nada dentro de el. Alguien sabe cual es el fallo?

Sin la funcion creada, poniendo las 1as lineas, consigo escribir dentro de el.

Codigo:

#include <vcl.h>
#pragma hdrstop
#include "Eleccion.h"
#include "Excel.h"
#include <fstream>


#include <stdio.h>
#include <stdlib.h>


AnsiString nombre ="c:\\modelo.fl";

int fichero=FileCreate(nombre.c_str());

/***************************************************************************
Nombre: imprimir
Descripción: Función que escribe el texto necesario en el fichero de texto
que sirve de entrada para un programa
***************************************************************************/
void Imprimir (int fichero, char *texto)
{
AnsiString Cadena = Cadena.sprintf("%s",texto);
FileWrite(fichero, Cadena.c_str(), Cadena.Length());
}

int fichero=FileCreate(nombre.c_str());//Crea el fichero del modelo, base para XA

void Generacion_titulo (int fichero, char *nombre)
{
Imprimir (fichero,"..TITLE\n");
Imprimir (fichero," "); }
/***************************************************************************
imprimir (fichero,nombre);
imprimir (fichero,"\n");
FileClose(fichero);
}
/***************************************************************************
Nombre: Generación_cab_funcion_objetivo
Descripción: Función encargada de la generación de la cabecera de la
función objetivo.
Parametros:
Entrada F1: Fichero donde se quiere generar.
***************************************************************************

void Generacion_cab_funcion_objetivo (int fichero)
{
imprimir (fichero,"..OBJECTIVE MINIMIZE\n");
}
/***************************************************************************
Nombre: Generacion_cotas
Descripci¢n: Funci¢n encargada de la generaci¢n de la cabecera de las
cotas.
Parametros:
Entrada F1: Fichero donde se quiere generar.
***************************************************************************

void Generacion_cotas (int fichero)
{
imprimir (fichero,"\n..BOUNDS\n");
}
/***************************************************************************
Nombre: Generacion_restricciones
Descripci¢n: Funci¢n encargada de la generaci¢n de la cabecera de las
restricciones.
Parametros:
Entrada F1: Fichero donde se quiere generar.
***************************************************************************

void Generacion_restricciones (int fichero)
{
imprimir (fichero,"\n..CONSTRAINT\n");
}


GRACIAS

[TOÑO]

HOLA:

Existen multiples formas de crear un fichero estilo texto, io <<, fopen, open, etc.

Pero deberias de aprobechar las ventanjas de la programacion con las herramientas ras ( usea el borland).

Que es un fichero de texto mondo y lirondo, Pones un TMemo, escribres
y le pones un boton -> Memo1 ->Lines ->SaveToFile ("Mi fichero txt");
Para cargar Memo1 ->Lines ->LoadFromFile ("mi txt");

Que es un programa mas complejo, pues utiliza base de datos, paradox para empezar, salvas en base de datos y utilizas una herramienta de reportes para listar los datos.

By.