I finally solved my problem using a Windows API The API code was developed by Sergey Berezniker and published here:
http://www.portalfox.com/index.php?name=News&file=article&sid=2729&mode=nested&order=0&thold=0 ** check whether OpenOffice is installed in the system Local lOK try lOK = .t. CREATEOBJECT( "com.sun.star.ServiceManager" ) Catch lOK = .f. endtry If lOK thisform.closeopenoffice() endif *** form closeopenoffice method #DEFINE WM_CLOSE 0x10 DECLARE LONG FindWindow IN WIN32API STRING ClassName, STRING WindowTitle DECLARE LONG SendMessage IN WIN32API LONG HWND, LONG Msg, LONG wParam, LONG LPARAM lcWindowTitle = "OpenOffice.org" HWND = FindWindow( NULL, lcWindowTitle ) IF HWND = 0 ** OpenOffice not detected RETURN ENDIF =SendMessage( HWND, WM_CLOSE, 0, 0 ) RETURN Rafael Copquin _______________________________________________ Post Messages to: ProFox@leafe.com Subscription Maintenance: http://leafe.com/mailman/listinfo/profox OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech Searchable Archive: http://leafe.com/archives/search/profox This message: http://leafe.com/archives/byMID/profox/5029650c.3050...@fibertel.com.ar ** All postings, unless explicitly stated otherwise, are the opinions of the author, and do not constitute legal or medical advice. This statement is added to the messages for those lawyers who are too stupid to see the obvious.
