Amebis/wxWidgets
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

patch from Dimitri fixing a few memory leaks and unTABbing the sources

Browse Source 
git-svn-id: https://svn.wxwidgets.org/svn/wx/wxWidgets/trunk@14660 c3d73ce0-8a6f-49c7-b76d-6d57e0e08775
This commit is contained in:
Vadim Zeitlin
2002-03-17 14:16:03 +00:00
parent 1c9f1f4d51
commit 2f6c54eb07
62 changed files with 616 additions and 552 deletions
Download Patch File Download Diff File Expand all files Collapse all files

32
samples/oleauto/oleauto.cpp
View File

@@ -201,26 +201,26 @@ void MyFrame::OnTest(wxCommandEvent& WXUNUSED(event))
{
wxMessageBox("Please ensure Excel is running, then press OK.\nThe active cell should then say 'wxWindows automation test!' in bold.");
wxAutomationObject excelObject, rangeObject;
if (!excelObject.GetInstance("Excel.Application"))
{
wxAutomationObject excelObject, rangeObject;
if (!excelObject.GetInstance("Excel.Application"))
{
if (!excelObject.CreateInstance("Excel.Application"))
{
wxMessageBox("Could not create Excel object.");
return;
wxMessageBox("Could not create Excel object.");
return;
}
}
if (!excelObject.PutProperty("ActiveCell.Value", "wxWindows automation test!"))
{
wxMessageBox("Could not set active cell value.");
return;
}
}
if (!excelObject.PutProperty("ActiveCell.Value", "wxWindows automation test!"))
{
wxMessageBox("Could not set active cell value.");
return;
}
#ifdef HAVE_BOOL
if (!excelObject.PutProperty("ActiveCell.Font.Bold", wxVariant((bool) TRUE)) )
{
wxMessageBox("Could not put Bold property to active cell.");
return;
}
if (!excelObject.PutProperty("ActiveCell.Font.Bold", wxVariant((bool) TRUE)) )
{
wxMessageBox("Could not put Bold property to active cell.");
return;
}
#endif
}