Реферат Розрахунок вартості пластикових віконних конструкцій і дверей

Writeln (f, StringGrid3.Cells [3,4]); Writeln (f, StringGrid3.Cells [3,5]);

Writeln (f, StringGrid3.Cells [3,6]); Writeln (f, StringGrid3.Cells [3,7]);

Writeln (f, StringGrid3.Cells [3,8]); CloseFile (f);

ShowMessage ('Дані збережені успішно!'); end else beginExit;

ShowMessage ('Помилка при зіпісі в файл!'); end; end;

procedure TForm22.SpeedButton1Click (Sender: TObject);

begin Close; end; end.