GUI module ported to api_scilab. test_run("gui")
[scilab.git] / scilab / modules / graphics / src / c / getHandleProperty / set_format_n_property.c
1 /*
2  * Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
3  * Copyright (C) 2004-2006 - INRIA - Fabrice Leray
4  * Copyright (C) 2006 - INRIA - Allan Cornet
5  * Copyright (C) 2006 - INRIA - Jean-Baptiste Silvy
6  * Copyright (C) 2009 - DIGITEO - Pierre Lando
7  * Copyright (C) 2010 - DIGITEO - Manuel Juliachs
8  *
9  * This file must be used under the terms of the CeCILL.
10  * This source file is licensed as described in the file COPYING, which
11  * you should have received as part of this distribution.  The terms
12  * are also available at
13  * http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt
14  *
15  */
16
17 /*------------------------------------------------------------------------*/
18 /* file: set_format_n_property.c                                          */
19 /* desc : function to modify in Scilab the format_n field of              */
20 /*        a handle                                                        */
21 /*------------------------------------------------------------------------*/
22
23 #include "setHandleProperty.h"
24 #include "SetProperty.h"
25 #include "getPropertyAssignedValue.h"
26 #include "SetPropertyStatus.h"
27 #include "GetProperty.h"
28 #include "Scierror.h"
29 #include "localization.h"
30 #include "MALLOC.h"
31 #include "string.h"
32
33 #include "setGraphicObjectProperty.h"
34 #include "graphicObjectProperties.h"
35
36 /*------------------------------------------------------------------------*/
37 int set_format_n_property(void* _pvCtx, char* pobjUID, void* _pvData, int valueType, int nbRow, int nbCol)
38 {
39     BOOL status = FALSE;
40     char* format = NULL;
41     if (valueType != sci_strings)
42     {
43         Scierror(999, _("Wrong type for '%s' property: String expected.\n"), "format_n");
44         return SET_PROPERTY_ERROR;
45     }
46
47     format = (char*)_pvData;
48
49     status = setGraphicObjectProperty(pobjUID, __GO_FORMATN__, format, jni_string, 1);
50     if (status == TRUE)
51     {
52         return SET_PROPERTY_SUCCEED;
53     }
54     else
55     {
56         Scierror(999, _("'%s' property does not exist for this handle.\n"), "format_n");
57         return SET_PROPERTY_ERROR;
58     }
59 }
60 /*------------------------------------------------------------------------*/