Curso de C++ Builder


Un sencillo editor de texto



Opción: Ficheros | Guardar y botón FileSaveBtn

 

//-----------------------------------------------------------

void __fastcall TMainForm::FileSaveClick(TObject *Sender)

{

// Si ya se ha especificado un nombre de fichero no es

// necesario abrir el cuadro de diálogo Guardar Fichero.

// Solo hay que guardarlo con SaveToFile().

if (SaveDialog->FileName != "") {

Memo->Lines->SaveToFile(SaveDialog->FileName);

// Establecer ahora la propiedad Modified a FALSE.

Memo->Modified = false;

}

// Si no se ha dado un nombre, ejecutar SaveAs().

else FileSaveAsClick(Sender);

}

//-----------------------------------------------------------

 



Atrás