mir/libreoffice
2
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

New RTL function CreateUnoDialog

Browse Source
This commit is contained in:
Andreas Bregas
2001-03-03 14:54:39 +00:00
parent a05e6416bf
commit b5edd6bffd
3 changed files with 24 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

18
basic/source/runtime/methods1.cxx
View File

@@ -2,9 +2,9 @@
* *
* $RCSfile: methods1.cxx,v $ * $RCSfile: methods1.cxx,v $
* *
* $Revision: 1.2 $ * $Revision: 1.3 $
* *
* last change: $Author: ab $ $Date: 2000-11-29 14:23:58 $ * last change: $Author: ab $ $Date: 2001-03-03 15:54:39 $
* *
* The Contents of this file are made available subject to the terms of * The Contents of this file are made available subject to the terms of
* either of the following licenses * either of the following licenses
@@ -1247,6 +1247,7 @@ RTLFUNC(CreateUnoService)
RTL_Impl_CreateUnoService( pBasic, rPar, bWrite ); RTL_Impl_CreateUnoService( pBasic, rPar, bWrite );
} }
// ServiceManager liefern (keine Parameter) // ServiceManager liefern (keine Parameter)
RTLFUNC(GetProcessServiceManager) RTLFUNC(GetProcessServiceManager)
{ {
@@ -1279,3 +1280,16 @@ RTLFUNC(EqualUnoObjects)
RTL_Impl_EqualUnoObjects( pBasic, rPar, bWrite ); RTL_Impl_EqualUnoObjects( pBasic, rPar, bWrite );
} }
// Instanciate "com.sun.star.awt.UnoControlDialog" on basis
// of a DialogLibrary entry: Convert from XML-ByteSequence
// and attach events. Implemented in classes\eventatt.cxx
void RTL_Impl_CreateUnoDialog( StarBASIC* pBasic, SbxArray& rPar, BOOL bWrite );
RTLFUNC(CreateUnoDialog)
{
RTL_Impl_CreateUnoDialog( pBasic, rPar, bWrite );
}

5
basic/source/runtime/rtlproto.hxx
View File

@@ -2,9 +2,9 @@
* *
* $RCSfile: rtlproto.hxx,v $ * $RCSfile: rtlproto.hxx,v $
* *
* $Revision: 1.1.1.1 $ * $Revision: 1.2 $
* *
* last change: $Author: hr $ $Date: 2000-09-18 16:12:11 $ * last change: $Author: ab $ $Date: 2001-03-03 15:50:11 $
* *
* The Contents of this file are made available subject to the terms of * The Contents of this file are made available subject to the terms of
* either of the following licenses * either of the following licenses
@@ -348,6 +348,7 @@ extern RTLFUNC(CreatePropertySet);
extern RTLFUNC(CreateUnoListener); extern RTLFUNC(CreateUnoListener);
extern RTLFUNC(HasUnoInterfaces); extern RTLFUNC(HasUnoInterfaces);
extern RTLFUNC(EqualUnoObjects); extern RTLFUNC(EqualUnoObjects);
extern RTLFUNC(CreateUnoDialog);
extern RTLFUNC(FileExists); extern RTLFUNC(FileExists);

7
basic/source/runtime/stdobj.cxx
View File

@@ -2,9 +2,9 @@
* *
* $RCSfile: stdobj.cxx,v $ * $RCSfile: stdobj.cxx,v $
* *
* $Revision: 1.1.1.1 $ * $Revision: 1.2 $
* *
* last change: $Author: hr $ $Date: 2000-09-18 16:12:11 $ * last change: $Author: ab $ $Date: 2001-03-03 15:51:15 $
* *
* The Contents of this file are made available subject to the terms of * The Contents of this file are made available subject to the terms of
* either of the following licenses * either of the following licenses
@@ -168,6 +168,9 @@ static Methods aMethods[] = {
{ "typename", SbxSTRING }, { "typename", SbxSTRING },
{ "CreateUnoService",SbxOBJECT, 1 | _FUNCTION, RTLNAME( CreateUnoService ) }, { "CreateUnoService",SbxOBJECT, 1 | _FUNCTION, RTLNAME( CreateUnoService ) },
{ "servicename", SbxSTRING }, { "servicename", SbxSTRING },
{ "CreateUnoDialog",SbxOBJECT, 2 | _FUNCTION, RTLNAME( CreateUnoDialog ) },
{ "dialoglibrary",SbxOBJECT },
{ "dialogname", SbxSTRING },
{ "CreateUnoStruct",SbxOBJECT, 1 | _FUNCTION, RTLNAME( CreateUnoStruct ) }, { "CreateUnoStruct",SbxOBJECT, 1 | _FUNCTION, RTLNAME( CreateUnoStruct ) },
{ "classname", SbxSTRING }, { "classname", SbxSTRING },
{ "CreatePropertySet",SbxOBJECT, 1 | _FUNCTION, RTLNAME( CreatePropertySet ) }, { "CreatePropertySet",SbxOBJECT, 1 | _FUNCTION, RTLNAME( CreatePropertySet ) },