Program w C++

[Mine-Beast PL]

Witam!

Kto poprawi mój skrypt notatnika w c++.

Proszę o pomoc.

Będą lajki

 

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

 

#include <vcl.h>

#pragma hdrstop

 

#include "Unit1.h"

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

#pragma package(smart_init)

#pragma resource "*.dfm"

TForm1 *Form1;

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

__fastcall TForm1::TForm1(TComponent* Owner)

: TForm(Owner)

{

}

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

 

 

void __fastcall TForm1::Nowy1Click(TObject *Sender)

{

Memo1->Clear();

Memo1->Modified = false;

SaveDialog1->FileName = "";

}

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

void __fastcall TForm1::Otwrz1Click(TObject *Sender)

{

if(OpenDialog1->Execute())

{

Memo1->Lines->LoadFromFile(OpenDialog1->FileName);

SaveDialog1->FileName = OpenDialog1->FileName;

Memo1->Modified = false;

}

}

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

void __fastcall TForm1::Zapiszjako1Click(TObject *Sender)

{ if(SaveDialog1->FileName == "")

 

if(SaveDialog1->Execute())

{

Memo1->Lines->SaveToFile(SaveDialog1->FileName);

Memo1->Modified = false;

}

}

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

void __fastcall TForm1::Zakocz1Click(TObject *Sender)

{

if(Memo1->Modified == true)

{

int opcja = Application->MessageBoxA("Czy chcesz zapisac zmiany", "Uwaga!", MB_YESNOCANCEL);

switch(opcja)

{

case IDYES:

Zapisz1Click(Sender);

break;

case IDNO:

Application->Terminate();

case IDCANCEL:

return;

break;

}

}

else

{

Application->Terminate();

}

}

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

void __fastcall TForm1::Kopiuj1Click(TObject *Sender)

{

Memo1->CopyToClipboard();

}

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

void __fastcall TForm1::Wklej1Click(TObject *Sender)

{

Memo1->PasteFromClipboard();

}

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

void __fastcall TForm1::Wytnij1Click(TObject *Sender)

{

Memo1->CutToClipboard();

}

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

void __fastcall TForm1::Zapisz1Click(TObject *Sender)

{

(

Memo1->Lines->SaveToFile(SaveDialog1->FileName);

Memo1->Modified = false;

SaveDialog1->Execute()

)

else

{

Memo1->Lines->SaveToFile(SaveDialog1->FileName);

Memo1->Modified = false;

}

}

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

[woBniaR]

A może najpierw napiszesz co w nim nie działa?

[Mine-Beast PL]

Gdy kompiluje to wyskakują błędy , a pisze go w Borland C++ Builder 6 Personal

[4ggr35510n]

int main() { return 0; }

 

Ta wersja powyższego kodu działa z całą pewnością.

Dokonałem drobnych poprawek.

 

Możesz też spróbować wkleić log z błędami z konsoli. Istnieje opinia, iż przydaje się to w identyfikacji i naprawianiu konkretnych błędów.

[mjut]

Wklej najpierw ten skrypt...

[Mine-Beast PL]

int main() { return 0; }

 

Ta wersja powyższego kodu działa z całą pewnością.

Dokonałem drobnych poprawek.

 

Możesz też spróbować wkleić log z błędami z konsoli. Istnieje opinia, iż przydaje się to w identyfikacji i naprawianiu konkretnych błędów.

Ok spróbuje, ale błąd wyskakuje w linijce :

 

Memo1->Lines->SaveToFile(SaveDialog1->FileName);

[4ggr35510n]

I jakiż jest to błąd...?

[Mine-Beast PL]

Temat do Zamknięcia

Problem rozwiązany notatnik działa