Skip to content
Projeler
Gruplar
Parçacıklar
Yardım
Yükleniyor...
Oturum aç / Kaydol
Gezinmeyi değiştir
C
core
Proje
Proje
Ayrıntılar
Etkinlik
Cycle Analytics
Depo (repository)
Depo (repository)
Dosyalar
Kayıtlar (commit)
Dallar (branch)
Etiketler
Katkıda bulunanlar
Grafik
Karşılaştır
Grafikler
Konular (issue)
0
Konular (issue)
0
Liste
Pano
Etiketler
Kilometre Taşları
Birleştirme (merge) Talepleri
0
Birleştirme (merge) Talepleri
0
CI / CD
CI / CD
İş akışları (pipeline)
İşler
Zamanlamalar
Grafikler
Paketler
Paketler
Wiki
Wiki
Parçacıklar
Parçacıklar
Üyeler
Üyeler
Collapse sidebar
Close sidebar
Etkinlik
Grafik
Grafikler
Yeni bir konu (issue) oluştur
İşler
Kayıtlar (commit)
Konu (issue) Panoları
Kenar çubuğunu aç
LibreOffice
core
Commits
99628775
Kaydet (Commit)
99628775
authored
Eyl 22, 2015
tarafından
Matteo Casalin
Dosyalara gözat
Seçenekler
Dosyalara Gözat
İndir
Eposta Yamaları
Sade Fark
sal_uLong to ErrCode
Change-Id: I2b4b2673aa27de664f6c6780e67c70559ec61971
üst
d1eb389d
Hide whitespace changes
Inline
Side-by-side
Showing
3 changed files
with
6 additions
and
6 deletions
+6
-6
svxmsbas2.cxx
filter/source/msfilter/svxmsbas2.cxx
+3
-3
svxmsbas.hxx
include/filter/msfilter/svxmsbas.hxx
+2
-2
expop2.cxx
sc/source/filter/excel/expop2.cxx
+1
-1
No files found.
filter/source/msfilter/svxmsbas2.cxx
Dosyayı görüntüle @
99628775
...
...
@@ -27,10 +27,10 @@
using
namespace
com
::
sun
::
star
;
sal_uLong
SvxImportMSVBasic
::
SaveOrDelMSVBAStorage
(
bool
bSaveInto
,
ErrCode
SvxImportMSVBasic
::
SaveOrDelMSVBAStorage
(
bool
bSaveInto
,
const
OUString
&
rStorageName
)
{
sal_uLong
nRet
=
ERRCODE_NONE
;
ErrCode
nRet
=
ERRCODE_NONE
;
uno
::
Reference
<
embed
::
XStorage
>
xSrcRoot
(
rDocSh
.
GetStorage
()
);
OUString
aDstStgName
(
GetMSBasicStorageName
()
);
tools
::
SvRef
<
SotStorage
>
xVBAStg
(
SotStorage
::
OpenOLEStorage
(
xSrcRoot
,
aDstStgName
,
...
...
@@ -62,7 +62,7 @@ sal_uLong SvxImportMSVBasic::SaveOrDelMSVBAStorage( bool bSaveInto,
// check if the MS-VBA-Storage exists in the RootStorage of the DocShell.
// If it exists, then return the WarningId for losing the information.
sal_uLong
SvxImportMSVBasic
::
GetSaveWarningOfMSVBAStorage
(
SfxObjectShell
&
rDocSh
)
ErrCode
SvxImportMSVBasic
::
GetSaveWarningOfMSVBAStorage
(
SfxObjectShell
&
rDocSh
)
{
uno
::
Reference
<
embed
::
XStorage
>
xSrcRoot
(
rDocSh
.
GetStorage
()
);
tools
::
SvRef
<
SotStorage
>
xVBAStg
(
SotStorage
::
OpenOLEStorage
(
xSrcRoot
,
GetMSBasicStorageName
(),
...
...
include/filter/msfilter/svxmsbas.hxx
Dosyayı görüntüle @
99628775
...
...
@@ -58,11 +58,11 @@ public:
// form the ObjectShell
// - returns a warning code if a modified basic exist, in all other
// cases return ERRCODE_NONE.
sal_uLong
SaveOrDelMSVBAStorage
(
bool
bSaveInto
,
const
OUString
&
rStorageName
);
ErrCode
SaveOrDelMSVBAStorage
(
bool
bSaveInto
,
const
OUString
&
rStorageName
);
// check if the MS-VBA-Storage exist in the RootStorage of the DocShell.
// If it exist, then return the WarningId for losing the information.
static
sal_uLong
GetSaveWarningOfMSVBAStorage
(
SfxObjectShell
&
rDocS
);
static
ErrCode
GetSaveWarningOfMSVBAStorage
(
SfxObjectShell
&
rDocS
);
static
OUString
GetMSBasicStorageName
();
private
:
...
...
sc/source/filter/excel/expop2.cxx
Dosyayı görüntüle @
99628775
...
...
@@ -105,7 +105,7 @@ FltError ExportBiff5::Write()
else
if
(
pDocShell
&&
xRootStrg
.
Is
()
&&
eVbaExportMode
==
VBAExportMode
::
REEXPORT_STREAM
)
{
SvxImportMSVBasic
aBasicImport
(
*
pDocShell
,
*
xRootStrg
);
sal_uLong
nErr
=
aBasicImport
.
SaveOrDelMSVBAStorage
(
true
,
EXC_STORAGE_VBA_PROJECT
);
const
ErrCode
nErr
=
aBasicImport
.
SaveOrDelMSVBAStorage
(
true
,
EXC_STORAGE_VBA_PROJECT
);
if
(
nErr
!=
ERRCODE_NONE
)
pDocShell
->
SetError
(
nErr
,
OUString
(
OSL_LOG_PREFIX
)
);
}
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment