Сохранение графика в базе данных

 

function График_в_БД : Extended;

Var iGraph : Integer;

etmp : Extended;

begin

iGraph := F_Graph_Add('Граф_test' , 'Ось Х ' , 'Ось У ' , 300); //Создание графика

F_Graph_PointAdd(iGraph , 1 , 5 ) ;// добавление точек графика

F_Graph_PointAdd(iGraph , 2 , 20 ) ;

F_Graph_PointAdd(iGraph , 3 , 0 ) ;

//    F_SetUFValue( 'Граф_test' , iGraph);// сохранение кода графика в переменную  'Граф_test'

// Переменная должна быть объявлена в БД.

F_Graph_Save;// Сохранение данных в БД

F_Graph_Show( iGraph);// Показ графика

end;

 

begin

График_в_БД ;

end.