Не работает __property

[teapot]

Сообщение от Smitt&Wesson

Как-то Вы странно класс пишете.

А что не так с моим классом? Он ещё не закончен, поэтому там нет деструктора и т.п.

Вообще, в итоге должен получиться калькулятор, поэтому пока событие происходит при нажатии кнопки на форме (можно просто кинуть BitBin1, и всё должно работать). Внизу прикреплён архив с проектом.

TPNumber.h

#include <vcl.h>
class TPNumber
{
   float n;
   int b;
   int c;


   public:

      //float PNum;

     TPNumber (float num=0, int sys=0, int precision=0);
     TPNumber (AnsiString snum,AnsiString ssys, AnsiString spr);

     TPNumber Copy();
     TPNumber Sum(TPNumber operand);
     TPNumber Multiply(TPNumber operand);
     TPNumber Subtraction(TPNumber operand);
     TPNumber Divide(TPNumber operand);

     float GetNumber();
     int GetSystem();
     int GetPrecision();
     void Display();

     bool Compare(TPNumber operand, AnsiString operation);

     __property float PNum = (read = GetNumber);
};

TPNumber.cpp

#include <TPNumber.h>
//#include "Global.cpp"
#include <iostream.h> //для корректного перевода строки в число    
#include <stdio.h>
#include <windows.h> //для месседжбокса
#include <except.h>
#include <vcl.h> //для ансистринг

//#include <stdlib.h>
//#include <conio.h>

TPNumber::TPNumber(float num, int sys, int precision)
 {
    n=num;
    b=sys;
    c=precision;
 };

TPNumber::TPNumber (AnsiString snum, AnsiString ssys, AnsiString spr)
{
   //MessageBox(NULL,"1","ОК",MB_OK);

   //переведём само число
   try
   {
      //MessageBox(NULL,"2","ОК",MB_OK);
      n=snum.ToDouble();
   }
   catch( EConvertError &e )
   {
      //MessageBox(NULL,"3","ОК",MB_OK);
      n = 0;
      ShowMessage("Строка в переменной snum числа не содержит "+snum);
   };

   //переведём систему счисления
   try
   {
      //MessageBox(NULL,"2","ОК",MB_OK);
      b=ssys.ToInt();
   }
   catch( EConvertError &e )
   {
      //MessageBox(NULL,"3","ОК",MB_OK);
      b = 0;
      ShowMessage("Строка в переменной ssys числа не содержит "+ssys);
   };
   if ((b<=0) || (b>16)) ShowMessage("Некорректная система счисления");

   try
   {
      //MessageBox(NULL,"2","ОК",MB_OK);
      c=spr.ToInt();
   }
   catch( EConvertError &e )
   {
      //MessageBox(NULL,"3","ОК",MB_OK);
      c = 0;
      ShowMessage("Строка в переменной spr числа не содержит "+spr);
   };
   if (c<0)
   {
      c = 0;
      ShowMessage("Некорректная точность "+spr);
   }
};

TPNumber TPNumber::Copy()
{
   TPNumber pnum(GetNumber(),GetSystem(),GetPrecision());
   return pnum;
};

TPNumber TPNumber::Sum(TPNumber operand)
{
};

TPNumber TPNumber::Multiply(TPNumber operand)
{

};

TPNumber TPNumber::Subtraction(TPNumber operand)
{
   
};

TPNumber TPNumber::Divide(TPNumber operand)
{
  
  
};

void TPNumber::Display()
{
   //MessageBox(NULL,"Число "+FloatToStr(n)+"/nСистема счисления "+IntToStr(b)+"/nТочность "+IntToStr(c),"ОК",MB_OK);

   ShowMessage("Число "+FloatToStr(n)+"; Система счисления "+IntToStr(b)+"; Точность "+IntToStr(c));
};

float TPNumber::GetNumber()
{
   return n;
};

int TPNumber::GetSystem()
{
   return b;
};

int TPNumber::GetPrecision()
{
   return c;
};

bool TPNumber::Compare(TPNumber operand, AnsiString operation)
{
   if ( operand.GetSystem() != GetSystem())
   {
      ShowMessage("У операндов разные системы счисления.Операция "+operation+" не выполнена");
      return false;
   };

   if (operand.GetPrecision() != GetPrecision())
   {
      ShowMessage("У операндов разная точность. Операция "+operation+" не выполнена");
      return false;
   };

   return true;
};

Main.cpp

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

#include <vcl.h>
#include "TPNumber.cpp"
#pragma hdrstop

#include "Main.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TFMain *FMain;
 //---------------------------------------------------------------------------
__fastcall TFMain::TFMain(TComponent* Owner)
        : TForm(Owner)
{

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




void __fastcall TFMain::BitBtn1Click(TObject *Sender)
{
  //TPNumber x("0","16","0");
  //x.Display();
  //MessageBox(NULL,"Строка переведена","ОК",MB_OK);

  /*TPNumber y;
  y=x.Copy();
  y.Display();*/

  TPNumber z(125,16,0);
  //z.Display();

  //TPNumber m=x.Sum(z);
  //TPNumber m=x.Multiply(z);
  //TPNumber m=x.Subtraction(z);
  //TPNumber m=x.Divide(z);
  //m.Display();

  float a;
  a=z.PNum;
};
//---------------------------------------------------------------------------

[Smitt&Wesson]

[C++ Error] Main.cpp(45): E2316 'Num' is not a member of 'TPNumber'
Ошибка в 45-й строке. А приведено строк 35. Вот и не понятно где она.

[teapot]

Сообщение от Smitt&Wesson

Ошибка в 45-й строке. А приведено строк 35. Вот и не понятно где она.

У меня [C++ Error] Main.cpp(43): E2316 'PNum' is not a member of 'TPNumber', и строка действительно 43-я (он же пустые тоже считает)

[teapot]

Сообщение от Smitt&Wesson

Вот и не понятно где она.

Я дико извиняюсь. Вчера заметила, что в строке
__property float PNum = {read = GetNumber};
вместо фигурных скобок стоят круглые. Исправила, сохранила. А сейчас смотрю - снова круглые... Опять исправила. Теперь работает.

Спасибо большое всем за участие! Ещё раз извиняюсь

[Smitt&Wesson]

У меня в обоих билдерах пишет [C++ Error] TPNumber.h(29): E2275 { expected

[teapot]

Сообщение от Smitt&Wesson

У меня в обоих билдерах пишет [C++ Error] TPNumber.h(29): E2275 { expected

вот! у меня тоже выпала эта ошибка (впервые за два дня), я исправила скобки на фигурные, и программа запустилась. Спустя секунду запускаю снова - опять E2316 'PNum' is not a member of 'TPNumber', про скобку уже не спрашивает. Непонятно

[teapot]

У меня такое ощущение, что он вообще h-файл не проверяет на синтаксические ошибки. Даже если одну из скобок в __property вообще убрать, он это пропускает и выдаёт прежнюю ошибку.

[teapot]

Сообщение от Smitt&Wesson

У меня в обоих билдерах пишет [C++ Error] TPNumber.h(29): E2275 { expected

а как Вы добились, чтобы перестала появляться прежняя ошибка?

[Smitt&Wesson]

Да в общем то никак. Поставил фигурные скобки и всё заработало.

[teapot]

Тут, оказывается, вот в чём дело. Я всё же девушка) поэтому, когда мне нужно сделать резервную копию моего проекта, я просто копирую папку с пректом, называю её по-другому и дальше продолжаю работать в ней. Так вот, мой проект при этом продолжает обращаться к TPNumber.h в прошлой папке. А тот, что в текущей папке, в упор отказывается видеть.

Буду делать наоборот. Новую папку отправлять в архив, а работать в старой.
Извините, что отняла столько времени из-за такой ерунды((