What i am trying to do is simply organize my contact information on my computer. During the testing of it, i found that the program will not open the file. The error message displayes "EMOpenError- Contacts cannot open List.cont"
Can anyone tell me what i am doing wrong....
Here is the code (Its in GUI using Borland)
cpp
//---------------------------------------------------------------------------
#include <clx.h>
#pragma hdrstop
#include <fstream>
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.xfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::AddContactClick(TObject *Sender)
{
TFileStream *FileStream;
FileStream = new TFileStream("List.Cont",fmOpenWrite);
FileStream->Write("Name: ", strlen("Name: "));
FileStream->Write(ContactName->Text, sizeof(ContactName->Text));
FileStream->Write("\n", sizeof("\n"));
FileStream->Write(Number1Type->Text, sizeof(Number1Type->Text));
FileStream->Write(": ", sizeof(": "));
FileStream->Write(Number1->Text, sizeof(Number1->Text));
FileStream->Write("\n", sizeof("\n"));
FileStream->Write(Number2Type->Text, sizeof(Number2Type->Text));
FileStream->Write(": ", sizeof(": "));
FileStream->Write(Number2->Text, sizeof(Number2->Text));
FileStream->Write("\n\n\n", sizeof("\n\n\n"));
}
//---------------------------------------------------------------------------
void __fastcall TForm1::LoadContactClick(TObject *Sender)
{
ContactsDisplay->Lines->LoadFromFile("List.cont");
}
//----------------
it doesnt display any other warnings or errors in the compilier.
Thanks in advance
3 Oct, 2008 - 01:09 PM
| 