Ошибка при записи в файл

@budda · Регистрация: 07.03.2010

Author24 — интернет-сервис помощи студентам

Цель проги сделать вычисление и записать в виде таблицы результаты в файл MSWord.

Вычисление произвожу с помощью функции:

C++

float __fastcall TForm1::Calc(TEdit *S1, TEdit *S2, TEdit *S3, int pn)
{
 float pizm, sp, p, s;
 pizm= StrToFloat(S1->Text);
 sp= StrToFloat(S2->Text);
 p= StrToFloat(S3->Text);
 s= pow((pow(sp,2)-pow(p,2)),0.5)/(pizm/pn);
 return s;
 }

обращаюсь к ней так:

C++

1	s [0]=600*Form1->Calc(Edit2, Edit3, Edit4, pn)/StrToInt(Edit1->Text);

Запись в файл произвожу с помощью Ole.
Отдельно при нажатии кнопки вычислить, вычисление замечательно работает.
Не нажимая кнопку вычислить, запись исходных данных в файл производится.
Если вместо обращения к функции Calc каждое вычисление писать отдельно, запись в файл также производится без ошибок.
Однако, если нажимается кнопка вычислить и вычисление производится путем обращения к функции Calc появляется следующая ошибка: "EOleSysError with message "Ошибка". При том, что запись вычисленных результатов в файл не производится.

Помогите плиз :-(

@spam1990 · 09.03.2010, 23:50

а где делаеш?????

@budda · 09.03.2010, 23:51 **[ТС]**

C++ Builder 6 (если вопрос об этом)

@spam1990 5 / 5 / 0 Регистрация: 03.03.2010 Сообщений: 38
	09.03.2010, 23:50	2
	а где делаеш????? 0

@budda 0 / 0 / 0 Регистрация: 07.03.2010 Сообщений: 4
	09.03.2010, 23:51 [ТС]	3
	C++ Builder 6 (если вопрос об этом) 0