C++ BUILDER

[Dimarik]

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

#include <vcl.h>
#pragma hdrstop
#include "Unit2.h"
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm2 *Form2;
//---------------------------------------------------------------------------
__fastcall TForm2::TForm2(TComponent* Owner)
        : TForm(Owner)
{
}                 
//---------------------------------------------------------------------------


void __fastcall TForm2::Button1Click(TObject *Sender)
{
        if (Edit2->Text=="привет")
        {
                this->Hide();
                Form1->Show();
        }


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

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

это главный файл, который запускается в самом начале

[Dimarik]

Код:


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

#include <vcl.h>
#pragma hdrstop

#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
AnsiString a,b;
int n,i;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------

void __fastcall TForm1::FormActivate(TObject *Sender)
{
        Memo1->Text="";
        Memo2->Text="";
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Button1Click(TObject *Sender)
{
        a=Memo1->Text;
        n=(a.Length());
        i=n;
        b=a;

        //изменение символов при помощи суммирования некоторых из них
        for(i=2;i<=n;i=i+2)
        {
                a[i]=a[i]-b[i-1];
        };
        Memo2->Text=a;



}
void __fastcall TForm1::Button2Click(TObject *Sender)
{
        a=Memo1->Text;
        n=(a.Length());
        b=a;
        //изменение символов при помощи суммирования некоторых из них
        for(i=2;i<n+1;i=i+2)
        {
                a[i]=a[i]+b[i-1];
        };

        Memo2->Text=a;

}

а вот и второй файл

[psycho-coder]

Странно у меня Ваш вариант работает
Пример в аттаче

[Dimarik]

так в чём фишка. нету синтаксических ошибок! их нет! есть linking error!

можешь подсказать, что мне делать? я даже не представляю. когда у меня были linking error, я просто перписывал программу, но это же не дело заново её писать постоянною в предудыщих постах я выложил свою ошибку и что предлагается на других форумах по её решению. убедительно прошу помочь


я ещё что-то редактировал в project\options
в form и application

[psycho-coder]

Вот и доредактировался Наверно.
Мой проект компилится?

[Dimarik]

ну так что мне теперь делать? Можно как-то поставить настройки проекта "по умолчанию"???
Твой проект компилится.
Можешь хотя б пояснить суть ошибки,что компилятору не нравится?

[psycho-coder]

Linker Error] Unresolved external '__fastcall TForm2::FormCreate(System::TObject *)' referenced from C:\PROGRAM FILES\BORLAND\CBUILDER6\PROJECTS\C+ + BUILDER\ШИФРОВАНИЕ\ПРОГРАММА\UNIT2. OBJ

Это значить что линковщик не нашел функцию TForm2::FormCreate.
Хотя ее описание присутствует.

Открой Unit2.h и там должна быть функция/, это выглядит примерно так

class TForm1 : public TForm
{
__published:	// IDE-managed Components
  void __fastcall FormCreate(TObject *Sender);
private:	// User declarations
public:		// User declarations
  __fastcall TForm1(TComponent* Owner);
};

Вот ее и сноси.

[Dimarik]

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

#ifndef Unit2H
#define Unit2H
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <ExtCtrls.hpp>
#include <jpeg.hpp>
#include <Graphics.hpp>
//---------------------------------------------------------------------------
class TForm2 : public TForm
{
__published:	// IDE-managed Components
        TButton *Button1;
        TImage *Image1;
        TLabel *Label1;
        TEdit *Edit1;
        TLabel *Label2;
        TEdit *Edit2;
        void __fastcall Button1Click(TObject *Sender);
        void __fastcall CreateForm(TObject *Sender);
        void __fastcall FormActivate(TObject *Sender);
private:	// User declarations
public:		// User declarations
        __fastcall TForm2(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TForm2 *Form2;
//---------------------------------------------------------------------------
#endif

P.s. я что-то делал в вкладке Events в OnCreate

ещё такой косяк. не помню, что я там делал, но у меня по умолчанию в OnCreate записано CreateForm. когда я произвожу двойной щелчок на этот CreateForm у меня выскакивает сообщение об ошибке: Cannot find implementation of metod CreateForm. Кажется это CreateForm ввёл с клавиатуры. Что мне делать?
P.S. Вот это мне выдоло Help по ошибке:
The indicated method is declared in the form's class declaration but cannot be located in the implementation section of the unit. It probably has been deleted, commented out, renamed, or incorrectly modified.
Use UNDO to reverse your changes, or correct the procedure declaration manually. Be sure the declaration in the class is identical to the one in the implementation section. (This is done automatically if you use the Object Inspector to create and rename event handlers.)

[psycho-coder]

Удали функцию

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

#ifndef Unit2H
#define Unit2H
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <ExtCtrls.hpp>
#include <jpeg.hpp>
#include <Graphics.hpp>
//---------------------------------------------------------------------------
class TForm2 : public TForm
{
__published: // IDE-managed Components
TButton *Button1;
TImage *Image1;
TLabel *Label1;
TEdit *Edit1;
TLabel *Label2;
TEdit *Edit2;
void __fastcall Button1Click(TObject *Sender);
void __fastcall CreateForm(TObject *Sender);
void __fastcall FormActivate(TObject *Sender);
private: // User declarations
public: // User declarations
__fastcall TForm2(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TForm2 *Form2;
//---------------------------------------------------------------------------
#endif

И в Events создай заново. Он ругается если функция объявлено не не написана.
Или допиши в Unit2.cpp где нибудь

void __fastcall CreateForm(TObject *Sender)
{
}

[Dimarik]

у меня есть 2 элемента CheckBox/ причём 1ый виден, а второй невиден. но я хочу сделать так, чтобы если 1ый становился отмеченным, то при этом 2ой становился видимым. я попробовал сделать так, но у меня это не получилось реализовать:

void __fastcall TForm1::CheckBox1Click(TObject *Sender)
{
        if (CheckBox1->Checked)
        {
                Label1->Visible;
                Edit1->Visible;
                CheckBox2->Visible;
        };
}

может какую-то другую функцию использовать?