Программа

Тема в разделе "C/C++/C#", создана пользователем Anna91, 10 апр 2012.

Статус темы:
Закрыта.
  1. Anna91

    Anna91 Гость

    Здравствуйте, пишу прогу на С++, выдает ошибки. в чем дело разобраться не могу. помогите, пожалуйста.
    Код программы:
    #include <vcl.h>
    #pragma hdrstop

    #include "Unit1.h"
    //---------------------------------------------------------------------------
    #pragma package(smart_init)
    #pragma resource "*.dfm"
    TForm1 *Form1;
    typedef struct {
    char tovar[15];
    char koli4estvo[3];
    int cena;
    char data[8];
    }TTovar;
    TTovar Tovar[100];
    int nzap=0;
    file *Fs;

    //---------------------------------------------------------------------------
    __fastcall TForm1::TForm1(TComponent* Owner)
    : TForm(Owner)
    {
    }
    //---------------------------------------------------------------------------

    void __fastcall TForm1::FormCreate(TObject *Sender)
    {
    Edit1->Clear();
    Edit2->Clear();
    Edit3->Clear();
    Edit4->Clear();
    Memo1->Clear();
    Button1->Hide();

    }
    //---------------------------------------------------------------------------
    void __fastcall TForm1::Button2Click(TObject *Sender)
    {
    OpenDialog1->Title="New File";
    if (OpenDialog1->Execute())
    {
    char *FileNameS=OpenDialog1->FileName.c_str();
    if ((Fs=fopen(FileNameS,"wb"))==NULL) {
    ShowMessage("File no created");
    return; }
    Button1->Show();

    }
    //---------------------------------------------------------------------------
    void __fastcall TForm1::Button1Click(TObject *Sender)
    {
    strcpy(Tovar[nzap].tovar,Edit1->Text.c_str());
    strcpy(Tovar[nzap].koli4estvo,Edit2->Text.c_str());
    Tovar[nzap].cena=StrToInt(Edit3->Text);
    strcpy(Tovar[nzap].data,Edit4->Text.c_str());

    Memo1->Lines->Add(AnsiString(Tovar[nzap].tovar));


    fwrite(&Tovar[nzap],sizeof(TTovar),1,Fs);
    nzap++;

    }
    //---------------------------------------------------------------------------
    void __fastcall TForm1::Button3Click(TObject *Sender)
    {
    OpenDialog1->Title="Open File";
    if(OpenDialog1->Execute())
    {
    char *FileNameS=OpenDialog1->FileName.c_str();
    if((Fs=fopen(FileNameS,"rb"))==NULL) {
    ShowMessage("File is not opened");
    return;}
    Memo1->Clear();
    Memo1->Lines->Add("Ðåçóëüòàòû ÷òåíèÿ ôàéëà:");
    nzap=0;
    while(fread(&Tovar[nzap],sizeof(TTovar),1,Fs)!=NULL)
    {Memo1->Lines->Add(AnsiString(Tovar[nzap].tovar)+" "+AnsiString(Tovar[nzap].koli4estvo));
    nzap++;
    }
    /*Button1->Show();
    Memo1->Clear();
    nzap=0;
    do
    {
    fread(&Tovar[nzap],sizeof(TTovar),1,Fs);
    if(feof(Fs)) break;
    Memo1->Lines->Add(AnsiString(Tovar[nzap].tovar));
    nzap++;
    }
    while(True); */
    Button1->Show();
    }

    }
    //---------------------------------------------------------------------------
    void __fastcall TForm1::Button4Click(TObject *Sender)
    {
    TTovar tmp;
    OpenDialog1->Title="Open File";
    if(OpenDialog1->Execute())
    {
    char *FileNameS=OpenDialog1->FileName.c_str();
    if((Fs=fopen(FileNameS,"rb"))==NULL) {
    ShowMessage("File is not opened");
    return;}
    int k=0;
    Memo1->Clear();
    Memo1->Lines->Add("Òîâàð, ùî ïî÷èíàºòüñÿ ç áóêâè Ì:");
    while(fread(&tmp,sizeof(TTovar),1,Fs)!=NULL)
    if (tmp.tovar[0]=='Ì'){Memo1->Lines->Add(AnsiString(tmp.tovar)+" "+AnsiString(tmp.koli4estvo));
    k++;
    }
    if(k==0)Memo1->Lines->Add("Òàêîãî òîâàðà íåò");
    fclose(Fs);
    }

    }
    //---------------------------------------------------------------------------
    void __fastcall TForm1::Button5Click(TObject *Sender)
    {
    SaveDialog1->Title="Save File";
    if(SaveDialog1->Execute())
    {
    AnsiString FileNameR=SaveDialog1->FileName;
    Memo1->Lines->SaveToFile(FileNameR);
    }

    }
    //---------------------------------------------------------------------------
    void __fastcall TForm1::Button6Click(TObject *Sender)
    {
    fclose(Fs);
    }
    //---------------------------------------------------------------------------



    и ее ошибки:
    Build
    [C++ Error] Unit1.cpp(45): E2268 Call to undefined function 'fopen'
    [C++ Error] Unit1.cpp(45): E2034 Cannot convert 'int' to 'void * *'
    [C++ Warning] Unit1.cpp(50): W8004 'FileNameS' is assigned a value that is never used
    [C++ Error] Unit1.cpp(53): E2089 Identifier 'Button1Click' cannot have a type qualifier
    [C++ Error] Unit1.cpp(139): E2139 Declaration missing ;
    [C++ Error] Unit1.cpp(139): E2134 Compound statement missing }



    огромное спасибо за помощь!
     
Загрузка...
Статус темы:
Закрыта.

Поделиться этой страницей