Класс в Delphi

[Utkin]

Сообщение от RUSt88

Fract obj = new Fract(); // пустая дробь (для вычислений)
Fract obj1 = new Fract(1, 2); // т.е. дробь 1/2
Fract obj2 = new Fract(2, 3);

obj = obj1 + obj2; // obj будет равен дроби 7/6

надеюсь выйдет след. версия Делфи, где сделают полноценную перегрузку, а пока этого нет даже в 2010 версии

Ну в такой форме конечно нету. Но перегрузка в Делфи 2010 возможна.

type
     Tobj=class
         class operator Add(a, b: Tobj): Tobj;
end;

var
       obj1, obj2: TObj;

begin
    ...
    obj1:=TObj.Create;
    obj2:=TObj.Create;
   
    ....
    obj1:=obj1+obj2;
end;
//////////////////////////////////////////////////////////////////////

TObj.Add(a, b: TObj): TObj;
begin
    
    ....
end;

С другой стороны, что значит полноценная перегрузка? Синтаксический сахар полноценным не бывает. Да и дзен программирования не одобряет перегрузку...

да. Из того что уже есть сделать нечто рабочее

Выложи весь проект в архиве, а там может у кого время будет. Ну полноценный проект могут и не сделать, но по-крайней мере синтаксические ляпы уберут, хоть компилироваться без ошибок будет.

[Vampirius]

Внутри задание ( 1 пункт ) и то что есть:

[Stilet]

TDrob = class;

; - убери

procedure Set (chisl, znam: Integer);

Set - резервированное слово. Пусть будет _Set

procedure Add (Chisl, Znam): Integer;

Ану бегом учить основы паскаля. Процедуры результат не возвращают, это делают функции. Да и неописанные параметры тоже запрещены. Что это за Chisl, Znam? какого типа?
Опять таки у тебя есть уже поля с такими именами. Так что эти параметры нужно переименовать. Добавь например букву A вначале к имени параметров

PrDrob := socrTDrob(y);

Это что? Может имелось ввиду:

Result := socrTDrob(y);

Аналогично в других процедурах

Вообще по хорошему этот код нужно полностью выбросить...

[Ecosasha]

Вот, сделал на скорую руку, прога работает, делает вычисления между двумя дробями
выбирать только надо через RadioGroup, а не через RadioButton.

И кстати, по моему там в вашем оригинальном исходнике есть ошибки по вычислению дробей, исправил на свой код, проверял правильность делением дробей, а потом производил операции и сравнивал с работой проги.

В первом архиве исходник на Дельфи 7.
Во втором просто exe.

Вопрос: сколько может стоить доработка имеющегося кода до рабочей программы?
Вид Формы имеется.

Если не шутка, то можете отослать символическую сумму на Webmoney кошелек R359717285998 в размере "хорошей банки пива"