Borland Builder, zapisz wczytaj

0

Witam, mam problem z zadankiem, przeszukałem uważnie internet i nie mogę znaleźć funkcji do zapisu i wczytania niestety jestem początkującym jeśli chodzi o te sprawy dlatego zaglądnełem tutaj szukając pomocy mam nadzieje, że się nie pomyliłem.

TAlbum_szczegoly *Album_szczegoly;
//---------------------------------------------------------------------------
__fastcall TAlbum_szczegoly::TAlbum_szczegoly(TComponent* Owner)
	: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TAlbum_szczegoly::Tytul_EditChange(TObject *Sender)
{
Caption = "informacja o albumie  -  " + Tytul_Edit->Text;
}
//---------------------------------------------------------------------------
void __fastcall TAlbum_szczegoly::Okladka_PictureDblClick(TObject *Sender)
{
if (OpenPictureDialog1->Execute()) {

  Okladka_Picture->Picture->LoadFromFile(OpenPictureDialog1->FileName);
}
}
//---------------------------------------------------------------------------

void __fastcall TAlbum_szczegoly::Wczytaj_BTNClick(TObject *Sender)
{
}
void __fastcall TAlbum_szczegoly::Zapisz_BTNClick(TObject *Sender)
{

 
published:	// IDE-managed Components
	TEdit *Tytul_Edit;
	TEdit *Wykonawca_Edit;
	TLabel *tytul;
	TLabel *Label2;
	TMaskEdit *Rok_edit;
	TLabel *Label1;
	TComboBox *Typ_Combo;
	TLabel *Label3;
	TComboBox *Ocena_Combo;
	TLabel *Label4;
	TMaskEdit *Ilosc_Plyt;
	TLabel *Label5;
	TUpDown *ilosc_UpDown;
	TImage *Okladka_Picture;
	TOpenPictureDialog *OpenPictureDialog1;
	TButton *Button1;
	TButton *Button2;
	TOpenDialog *OpenDialog1;
	TSaveDialog *SaveDialog1;

0

TFileStream
lub
fstream

0

Zrobilem tak i zabardzo mi nie wyszlo. Użylem Fstream tak jak pisałeś, ale wyskakuje mi taki błąd:
[code] __fastcall TAlbum_szczegoly::Wczytaj_BTNClick(TObject *) is not a member of 'TAlbum_Szczegoly' [/code]

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

#include <vcl.h>
#include <fstream>
#pragma hdrstop

#include "album.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TAlbum_szczegoly *Album_szczegoly;
//---------------------------------------------------------------------------
__fastcall TAlbum_szczegoly::TAlbum_szczegoly(TComponent* Owner)
	: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TAlbum_szczegoly::Tytul_EditChange(TObject *Sender)
{
Caption = "informacja o albumie  -  " + Tytul_Edit->Text;
}
//---------------------------------------------------------------------------
void __fastcall TAlbum_szczegoly::Okladka_PictureDblClick(TObject *Sender)
{
if (OpenPictureDialog1->Execute()) {

  Okladka_Picture->Picture->LoadFromFile(OpenPictureDialog1->FileName);
}
}
//---------------------------------------------------------------------------
void __fastcall TAlbum_szczegoly::Wczytaj_BTNClick(TObject *Sender)
 {
TFileStream *FStream;

 if (OpenDialog1->Execute())
  {
  try{
	  FStream = new TFileStream (OpenDialog1->FileName,fmOpenRead | fmShareExclusive);
	  FStream->ReadComponent(Tytyl_Edit);
	  FStream->ReadComponent(Wykonawca_Edit);
	  FStream->ReadComponent(Typ_Combo);
	  FStream->ReadComponent(Ilosc_Plyt);
	  FStream->ReadComponent(Rok_edit);
	  FStream->ReadComponent(Ocena_Combo);
	  }
	 __finally
  {delete FStream;
  }
  }

}
//---------------------------------------------------------------------------

void __fastcall TAlbum_szczegoly::Zapisz_BTNClick(TObject *Sender)
{
TFileStream *FStream;
if (SaveDialog1->Execute())
 {
 try{
	 FStream = new TFileStream(SaveDialog1->FileName,fmCreate);
	 FStream->WriteComponent(Tytul_Edit);
	 FStream->WriteComponent(Wykonawca_Edit);
	 FStream->WriteComponent(Typ_Combo);
	 FStream->WriteComponent(Ilosc_Plyt);
	 FStream->WriteComponent(Rok_edit);
	 FStream->WriteComponent(Ocena_Combo);
		  }
	  __finally
	  {
		  delete FStream;
	  }
 }
}
//---------------------------------------------------------------------------
0

Ten błąd nie ma nic wspólnego z fstream.
Nie masz zadeklarowanej tej metody w pliku *.h

0

a jak zadeklarować?

0

Podwójny klik na przycisk.

0

Dzięki wielkie chodzi już programik.

1 użytkowników online, w tym zalogowanych: 0, gości: 1