kolnas;
}
//перевантаження присвоювання 1 amp; pilesos :: operator=(const pilesos amp; k)//об'єкт=
{if (this!= amp; k)
{= k.name;=k.power;=k.cena;=k.obv1;=k.pow11;=k.kolnas;
} * this;
}
//перевантаження сравненіяoperator == (const pilesos amp; m1, pilesos amp; m2)
{srav; (m1.cena == m2.cena)
{srav=true;} else
{srav=false;}; srav;
}
//печатьpilesos :: print (TStringGrid * k, int amp; j) const
{= j + 1; gt; RowCount=j + 1; gt; Cells [0] [j]=name; gt; Cells [1] [j]=IntToStr (power); gt ; Cells [2] [j]=IntToStr (cena); gt; Cells [3] [j]=IntToStr (obv1); gt; Cells [4] [j]=IntToStr (pow11); gt; Cells [5] [j]=IntToStr (kolnas);
}
//------ МІКРОХВИЛЬОВА ПІЧ 3.3 ----------------------------- microv_pechi: public bit_texnica
{public: _pechi (); _ pechi (AnsiString n, int mo, int p, AnsiString t);// t-тип
~ microv_pechi () {}; print (TStringGrid * k, int amp; j) const; save (char * s);// сохраненіеclear (char * s);// очистка файлу перед запісьюload (char * s, TStringGrid *, int amp;);// завантаження з файла_pechi amp; operator=(const microv_pechi amp; m);// перевантаження прісваіваніяbool operator == (const microv_pechi amp; m1, microv_pechi amp; m2);// перевантаження порівняння: tip;
};
//очистка перед запісьюmicrov_pechi :: clear (char * s)
{* f1;=fopen (s, w ); (f1);
}
//сохранеіне в файлmicrov_pechi :: save (char * s)
{* f1;=fopen(s,laquo;araquo;);(f1,laquo;%snraquo;,name);(f1,laquo;%inraquo;,power);(f1,laquo;%inraquo;,cena);(f1,laquo;%snraquo;,tip);(f1);
}
//завантаження з файлаmicrov_pechi :: load (char * s, TStringGrid * s1, int amp; j)
{AnsiString fn=s; fin (s); ss; (! fin.eof ())
{microv_pechi m; (fin, ss, n );// читає цілий рядок (ss!= )
{m.name=ss.c_str (); } (fin, ss, n ); (ss!= )
{. power=StrToInt (ss.c_str ()); } (fin, ss, n ); (ss!= )
{. cena=StrToInt (ss.c_str ());} (fin, ss, n ); (ss!= )
{. tip=ss.c_str () ;. print (s1, j); }
}. close ();
} _ pechi :: microv_pechi (): bit_texnica ()
{= соло raquo ;;
} _ pechi :: microv_pechi (AnsiString n, int mo, int p, AnsiString t): bit_texnica (n, mo, p)
{= t;
}
//перевантаження присвоювання! _pechi amp; microv_pechi :: operator=(const microv_pechi amp; m)//об'єкт=
{if (this!= amp; m)
{= m.name;=m.power;=m.cena;=m.tip;
} * this;
}
//перевантаження сравненіяoperator == (const microv_pechi amp; m1, microv_pechi amp; m2)
{srav; (m1.cena == m2.cena)
{srav=true;} else
{srav=false;}; srav;
}
//печатьmicrov_pechi :: print (TStringGrid * k, int amp; j) const
{= j + 1; gt; RowCount=j + 1; gt; Cells [0] [j]=name; gt; Cells [1] [j]=IntToStr (power); gt ; Cells [2] [j]=IntToStr (cena); gt; Cells [3] [j]=tip;
}; __ fastcall TForm1 :: RadioGroup1Click (TObject * Sender)
{Label12- gt; Visible=true;=RadioGroup1- gt; ItemIndex; (i == 0)//Морозильні камери
{GroupBox2-gt;Visible=True;-gt;Visible=False;-gt;Visible=False;-gt;Visible=False;-gt;Visible=False;-gt;Visible=False;-gt;Visible=False;-gt;Visible=True;-gt;Visible=True;-gt;Visible=True;-gt;Visible=True;-gt;Visible=False;-gt;Visible=False;-gt;Visible=False;
} (i == 1)//Холодильники
{-gt;Visible=False;-gt;Visible=True;-gt;Visible=False;-gt;Visible=True;-gt;Visible=False;-gt;Visible=False;-gt;Visible=False;-gt;Visible=False;-gt;Visible=False;-gt;Visible=True;-gt;Visible=False;-gt;Visible=True;-gt;Visible=False;-gt;Visible=False;
} if (i == 2)//Мікрохвильові печі
{GroupBox2-gt;Visible=False;-gt;Visible=False;-gt;Visible=True;-gt;Visible=False;-gt;Visible=False;-gt;Visible=False;-gt;Visible=True;-gt;Visible=False;-gt;Visible=False;-gt;Visible=True;-gt;Visible=False;-gt;Visible=False...
