Integration of OCCT 6.5.0 from SVN
[occt.git] / samples / mfc / standard / 04_Viewer3d / src / Viewer3dDoc.cpp
1 // Viewer3dDoc.cpp : implementation of the CViewer3dDoc class
2 //
3
4 #include "stdafx.h"
5 #include "Viewer3dApp.h"
6 #include "BoxRadius.h"
7 #include "DlgIsos.h"
8
9 #include "Viewer3dDoc.h"
10 #include "Viewer3dView.h"
11 #include "OffsetDlg.h"
12 #include "ResultDialog.h"
13 #include "User_Cylinder.hxx"
14
15 #include "AIS_Trihedron.hxx"
16 #include "Geom_Axis2Placement.hxx"
17
18 /////////////////////////////////////////////////////////////////////////////
19 // CViewer3dDoc
20
21 IMPLEMENT_DYNCREATE(CViewer3dDoc, CDocument)
22
23 BEGIN_MESSAGE_MAP(CViewer3dDoc, OCC_3dBaseDoc)
24         //{{AFX_MSG_MAP(CViewer3dDoc)
25         ON_COMMAND(ID_BOX, OnBox)
26         ON_COMMAND(ID_Cylinder, OnCylinder)
27         ON_COMMAND(ID_SPHERE, OnSphere)
28         ON_COMMAND(ID_ERASEALL, OnRemoveAll)
29         ON_COMMAND(ID_NBISOS, OnNbisos)
30         ON_COMMAND(ID_FACES, OnFaces)
31         ON_COMMAND(ID_EDGES, OnEdges)
32         ON_COMMAND(ID_VERTICES, OnVertices)
33         ON_COMMAND(ID_NEUTRAL, OnNeutral)
34         ON_COMMAND(ID_USERCYLINDER_CHANGEFACECOLOR, OnUsercylinderChangefacecolor)
35         ON_COMMAND(ID_FILLET3D, OnFillet3d)
36         ON_COMMAND(ID_CIRCLE, OnCircle)
37         ON_COMMAND(ID_LINE, OnLine)
38         ON_COMMAND(ID_OVERLAPPED_BOX, OnOverlappedBox)
39         ON_COMMAND(ID_OVERLAPPED_CYLINDER, OnOverlappedCylinder)
40         ON_COMMAND(ID_OVERLAPPED_SPHERE, OnOverlappedSphere)
41         ON_COMMAND(ID_POLYGON_OFFSETS, OnPolygonOffsets)
42         ON_UPDATE_COMMAND_UI(ID_POLYGON_OFFSETS, OnUpdatePolygonOffsets)
43         ON_UPDATE_COMMAND_UI(ID_Cylinder, OnUpdateCylinder)
44         ON_UPDATE_COMMAND_UI(ID_SPHERE, OnUpdateSphere)
45         ON_UPDATE_COMMAND_UI(ID_BOX, OnUpdateBox)
46         ON_UPDATE_COMMAND_UI(ID_OVERLAPPED_CYLINDER, OnUpdateOverlappedCylinder)
47         ON_UPDATE_COMMAND_UI(ID_OVERLAPPED_SPHERE, OnUpdateOverlappedSphere)
48         ON_UPDATE_COMMAND_UI(ID_OVERLAPPED_BOX, OnUpdateOverlappedBox)
49         ON_COMMAND(ID_OBJECT_REMOVE, OnObjectRemove)
50         ON_COMMAND(ID_OBJECT_ERASE, OnObjectErase)
51         ON_COMMAND(ID_OBJECT_DISPLAYALL, OnObjectDisplayall)
52         ON_COMMAND(ID_OBJECT_COLORED_MESH, OnObjectColoredMesh)
53         ON_UPDATE_COMMAND_UI(ID_OBJECT_COLORED_MESH, OnUpdateObjectColoredMesh)
54         ON_UPDATE_COMMAND_UI(ID_OBJECT_SHADING, OnUpdateObjectShading)
55         ON_UPDATE_COMMAND_UI(ID_OBJECT_WIREFRAME, OnUpdateObjectWireframe)
56         ON_COMMAND(ID_OPTIONS_TRIHEDRON_DYNAMIC_TRIHEDRON, OnOptionsTrihedronDynamicTrihedron)
57         ON_UPDATE_COMMAND_UI(ID_OPTIONS_TRIHEDRON_DYNAMIC_TRIHEDRON, OnUpdateOptionsTrihedronDynamicTrihedron)
58         ON_UPDATE_COMMAND_UI(ID_OPTIONS_TRIHEDRON_STATIC_TRIHEDRON, OnUpdateOptionsTrihedronStaticTrihedron)
59         ON_COMMAND(ID_OBJECT_MATERIAL, OnObjectMaterial)
60         ON_COMMAND(ID_TEXTURE_ON, OnTextureOn)
61         ON_COMMAND(ID_BUTTONNext, OnBUTTONNext)
62         ON_COMMAND(ID_BUTTONStart, OnBUTTONStart)
63         ON_COMMAND(ID_BUTTONRepeat, OnBUTTONRepeat)
64         ON_COMMAND(ID_BUTTONPrev, OnBUTTONPrev)
65         ON_COMMAND(ID_BUTTONEnd, OnBUTTONEnd)
66         ON_UPDATE_COMMAND_UI(ID_BUTTONNext, OnUpdateBUTTONNext)
67         ON_UPDATE_COMMAND_UI(ID_BUTTONPrev, OnUpdateBUTTONPrev)
68         ON_UPDATE_COMMAND_UI(ID_BUTTONStart, OnUpdateBUTTONStart)
69         ON_UPDATE_COMMAND_UI(ID_BUTTONRepeat, OnUpdateBUTTONRepeat)
70         ON_UPDATE_COMMAND_UI(ID_BUTTONEnd, OnUpdateBUTTONEnd)
71         ON_COMMAND(ID_FILE_NEW, OnFileNew)
72         ON_COMMAND(ID_DUMP_VIEW, OnDumpView)
73         //}}AFX_MSG_MAP
74 END_MESSAGE_MAP()
75
76 /////////////////////////////////////////////////////////////////////////////
77 // CViewer3dDoc construction/destruction
78
79 CViewer3dDoc::CViewer3dDoc()
80 {
81         myCylinder.Nullify();
82         mySphere.Nullify();
83         myBox.Nullify();
84         myOverlappedCylinder.Nullify();
85         myOverlappedSphere.Nullify();
86         myOverlappedBox.Nullify();
87         myOffsetDlg = NULL;
88         myStaticTrihedronAxisIsDisplayed = FALSE;
89
90         myState = -1;
91
92         isTextureSampleStarted = FALSE;
93 /*
94         // TODO: add one-time construction code here
95         Handle(Graphic3d_WNTGraphicDevice) theGraphicDevice = 
96                 ((CViewer3dApp*)AfxGetApp())->GetGraphicDevice();
97
98         myViewer = new V3d_Viewer(theGraphicDevice,(short *) "Visu3D");
99         myViewer->SetDefaultLights();
100         myViewer->SetLightOn();
101 */
102
103 //      myViewer->SetDefaultBackgroundColor(Quantity_TOC_RGB, 0.,0.,0.);
104
105         myPresentation = OCCDemo_Presentation::Current;
106         myPresentation->SetDocument(this);
107
108
109         myAISContext->DefaultDrawer()->ShadingAspect()->SetColor(Quantity_NOC_CHARTREUSE1); 
110         myAISContext->DefaultDrawer()->ShadingAspect()->SetMaterial(Graphic3d_NOM_SILVER);
111
112         strcpy_s(myDataDir, "Data");
113         strcpy_s(myLastPath, ".");
114
115         /*
116         Handle(AIS_Trihedron) myTrihedron;
117         Handle(Geom_Axis2Placement) myTrihedronAxis=new Geom_Axis2Placement(gp::XOY());
118         myTrihedron=new AIS_Trihedron(myTrihedronAxis);
119         myAISContext->Display(myTrihedron);
120         */
121 }
122
123 CViewer3dDoc::~CViewer3dDoc()
124 {
125 }
126
127 /////////////////////////////////////////////////////////////////////////////
128 // CViewer3dDoc diagnostics
129
130 #ifdef _DEBUG
131 void CViewer3dDoc::AssertValid() const
132 {
133         CDocument::AssertValid();
134 }
135
136 void CViewer3dDoc::Dump(CDumpContext& dc) const
137 {
138         CDocument::Dump(dc);
139 }
140 #endif //_DEBUG
141
142 /////////////////////////////////////////////////////////////////////////////
143 // CViewer3dDoc commands
144
145 void CViewer3dDoc::UpdateResultMessageDlg(CString Title, TCollection_AsciiString aMessage)
146 {
147     CString text(aMessage.ToCString());
148     myCResultDialog.SetText(text);
149
150     myCResultDialog.SetTitle(Title);
151 }
152
153 void CViewer3dDoc::OnBox() 
154 {
155         if(myBox.IsNull()){
156                 BRepPrimAPI_MakeBox B(gp_Pnt(0,-400,-100), 200.,150.,100.);
157
158
159                 myBox = new AIS_Shape(B.Shape());
160
161                 myAISContext->SetMaterial(myBox,Graphic3d_NOM_PEWTER);    
162                 myAISContext->SetDisplayMode(myBox,1);
163
164                 myAISContext->Display(myBox);   
165                 TCollection_AsciiString Message("\
166 BRepPrimAPI_MakeBox Box1(gp_Pnt(0,-400,-100), 200.,150.,100.);\n\
167                 ");
168                 
169                 UpdateResultMessageDlg("Create Box",Message);
170
171         }
172 }
173
174 void CViewer3dDoc::OnCylinder() 
175 {
176         if(myCylinder.IsNull()) {
177                 gp_Ax2 CylAx2(gp_Pnt(0,0,-100), gp_Dir(gp_Vec(gp_Pnt(0,0,-100),gp_Pnt(0,0,100))));
178
179                 //BRepPrimAPI_MakeCylinder C(CylAx2, 80.,200.);
180                 
181                 myCylinder = new User_Cylinder(CylAx2, 80.,200.);
182                 
183 //              myCylinder = new AIS_Shape(C.Shape());
184 /*
185                 myCylinder->SetTransparency(0.5);               
186
187                 myAISContext->SetColor(myCylinder,Quantity_NOC_WHITE); 
188                 myAISContext->SetMaterial(myCylinder,Graphic3d_NOM_SHINY_PLASTIC);    
189 */
190                 myAISContext->SetDisplayMode(myCylinder,1);
191
192                 myAISContext->Display(myCylinder);
193
194                 TCollection_AsciiString Message("\
195 gp_Ax2 CylAx2(gp_Pnt(0,0,-100), gp_Dir(gp_Vec(gp_Pnt(0,0,-100),gp_Pnt(0,0,100))));\n\
196 C = new User_Cylinder(CylAx2, 80.,200.);;\n\
197                 ");
198                 
199                 UpdateResultMessageDlg("Create Cylinder",Message);
200
201         }
202 }
203
204 void CViewer3dDoc::OnSphere() 
205 {
206         if(mySphere.IsNull()){
207                 BRepPrimAPI_MakeSphere S(gp_Pnt(0,300,0), 100.);
208
209                 mySphere = new AIS_Shape(S.Shape());
210                 
211                 myAISContext->SetMaterial(mySphere,Graphic3d_NOM_BRONZE);    
212                 myAISContext->SetDisplayMode(mySphere,1);
213
214                 myAISContext->Display(mySphere);
215                 TCollection_AsciiString Message("\
216 BRepPrimAPI_MakeSphere S(gp_Pnt(0,300,0), 100.);\n\
217                 ");
218                 UpdateResultMessageDlg("Create Sphere",Message);
219         }
220 }
221
222 void CViewer3dDoc::OnRemoveAll() 
223
224 {
225         AIS_ListOfInteractive aListOfObjects;
226         myAISContext->ObjectsInside(aListOfObjects,AIS_KOI_Shape);
227
228         AIS_ListIteratorOfListOfInteractive aListIterator;
229         for(aListIterator.Initialize(aListOfObjects);aListIterator.More();aListIterator.Next()){
230                 myAISContext->Remove(aListIterator.Value());
231         }
232
233         myAISContext->Remove(myCylinder);
234
235
236         myCylinder.Nullify();
237         mySphere.Nullify();
238         myBox.Nullify();
239         myOverlappedCylinder.Nullify();
240         myOverlappedSphere.Nullify();
241         myOverlappedBox.Nullify();
242         if(myOffsetDlg && myOffsetDlg->IsWindowVisible())
243                 myOffsetDlg->UpdateValues();
244 }
245
246 void CViewer3dDoc::OnOverlappedBox() 
247 {
248         OnBox();
249         if(myOverlappedBox.IsNull()){
250                 BRepPrimAPI_MakeBox B(gp_Pnt(0,-400,-100), 200.,150.,100.);
251
252                 BRepBuilderAPI_NurbsConvert aNurbsConvert(B.Shape());
253                 TopoDS_Shape aBoxShape2 = aNurbsConvert.Shape();
254
255
256                 myOverlappedBox = new AIS_Shape(aBoxShape2);
257
258                 myAISContext->SetMaterial(myOverlappedBox,Graphic3d_NOM_GOLD);    
259                 myAISContext->SetDisplayMode(myOverlappedBox,1);
260
261                 myAISContext->Display(myOverlappedBox); 
262                 TCollection_AsciiString Message("\
263 BRepPrimAPI_MakeBox Box1(gp_Pnt(0,-400,-100), 200.,150.,100.);\n\
264 \n\
265 BRepPrimAPI_MakeBox Box2(gp_Pnt(0,-400,-100), 200.,150.,100.);\n\
266 BRepBuilderAPI_NurbsConvert aNurbsConvert(Box2.Shape());\n\
267                 ");
268                 UpdateResultMessageDlg("Create overlapped boxes",Message);
269                 if(myOffsetDlg && myOffsetDlg->IsWindowVisible())
270                         myOffsetDlg->UpdateValues();
271
272
273         }
274 }
275
276 void CViewer3dDoc::OnOverlappedCylinder() 
277 {
278         OnCylinder();
279
280         if(myOverlappedCylinder.IsNull()){
281                 gp_Ax2 CylAx2(gp_Pnt(0,0,-100), gp_Dir(gp_Vec(gp_Pnt(0,0,-100),gp_Pnt(0,0,100))));
282                 BRepPrimAPI_MakeCylinder C(CylAx2, 80.,200.);
283
284                 BRepBuilderAPI_NurbsConvert aNurbsConvert(C.Shape());
285                 TopoDS_Shape aCylShape2 = aNurbsConvert.Shape();
286
287                 myOverlappedCylinder = new AIS_Shape(aCylShape2);
288
289         
290                 myAISContext->SetMaterial(myOverlappedCylinder,Graphic3d_NOM_GOLD);    
291                 myAISContext->SetDisplayMode(myOverlappedCylinder,1);
292
293                 myAISContext->Display(myOverlappedCylinder);
294
295                 TCollection_AsciiString Message("\
296 gp_Ax2 CylAx2(gp_Pnt(0,0,-100), gp_Dir(gp_Vec(gp_Pnt(0,0,-100),gp_Pnt(0,0,100))));\n\
297 Cylinder1 = new User_Cylinder(CylAx2, 80.,200.);\n\
298 \n\
299 BRepPrimAPI_MakeCylinder Cylinder2(CylAx2, 80.,200.);\n\
300 BRepBuilderAPI_NurbsConvert aNurbsConvert(Cylinder2.Shape());\n\
301                 ");
302                 UpdateResultMessageDlg("Create overlapped cylinders",Message);
303                 if(myOffsetDlg && myOffsetDlg->IsWindowVisible())
304                         myOffsetDlg->UpdateValues();
305
306         }
307 }
308
309 void CViewer3dDoc::OnOverlappedSphere() 
310 {
311         OnSphere();
312         if(myOverlappedSphere.IsNull()){
313                 BRepPrimAPI_MakeSphere S(gp_Pnt(0,300,0), 100.);
314
315                 BRepBuilderAPI_NurbsConvert aNurbsConvert(S.Shape());
316                 TopoDS_Shape aSphereShape2 = aNurbsConvert.Shape();
317
318                 myOverlappedSphere = new AIS_Shape(aSphereShape2);
319
320                 myAISContext->SetMaterial(myOverlappedSphere,Graphic3d_NOM_GOLD);    
321
322                 myAISContext->SetDisplayMode(myOverlappedSphere,1);
323
324                 myAISContext->Display(myOverlappedSphere);
325
326                 TCollection_AsciiString Message("\
327 BRepPrimAPI_MakeSphere Sphere1(gp_Pnt(0,300,0), 100.);\n\
328 \n\
329 BRepPrimAPI_MakeSphere Sphere2(gp_Pnt(0,300,0), 100.);\n\
330 BRepBuilderAPI_NurbsConvert aNurbsConvert(Sphere2.Shape());\n\
331                 ");
332                 UpdateResultMessageDlg("Create overlapped spheres",Message);
333                 if(myOffsetDlg && myOffsetDlg->IsWindowVisible())
334                         myOffsetDlg->UpdateValues();
335
336         }
337 }
338
339 void CViewer3dDoc::OnPolygonOffsets() 
340 {
341
342         myOffsetDlg = new COffsetDlg(this);
343         myOffsetDlg->Create(COffsetDlg::IDD,NULL);
344         myAISContext->UpdateCurrentViewer();
345
346 }
347
348 void CViewer3dDoc::OnUpdatePolygonOffsets(CCmdUI* pCmdUI) 
349 {
350         Standard_Integer aOffsetMode;
351         Standard_Real aFactor;
352         Standard_Real aCylUnits = 0;
353         Standard_Real aSphereUnits = 0;
354         Standard_Real aBoxUnits = 0;
355
356         BOOL IsOverlappedCylinderDisplayed = myAISContext->IsDisplayed(myOverlappedCylinder);
357         BOOL IsOverlappedSphereDisplayed = myAISContext->IsDisplayed(myOverlappedSphere);
358         BOOL IsOverlappedBoxDisplayed = myAISContext->IsDisplayed(myOverlappedBox);
359         BOOL IsAnyOverlappedObjectDisplayed = 
360                 IsOverlappedCylinderDisplayed || IsOverlappedSphereDisplayed || IsOverlappedBoxDisplayed;
361         
362         if(!myOverlappedCylinder.IsNull() && IsOverlappedCylinderDisplayed){
363                 myOverlappedCylinder->PolygonOffsets(aOffsetMode,aFactor,aCylUnits);
364         }
365         
366         if(!myOverlappedSphere.IsNull() && IsOverlappedSphereDisplayed){
367                 myOverlappedSphere->PolygonOffsets(aOffsetMode,aFactor,aSphereUnits);
368         }
369
370         if(!myOverlappedBox.IsNull() && IsOverlappedBoxDisplayed){
371                 myOverlappedBox->PolygonOffsets(aOffsetMode,aFactor,aBoxUnits);
372         }
373
374         if(myOffsetDlg && myOffsetDlg->IsWindowVisible())
375                 pCmdUI->SetCheck(TRUE);
376         else
377                 pCmdUI->SetCheck(FALSE);
378         if (IsAnyOverlappedObjectDisplayed)
379                 if(myOffsetDlg)
380                         pCmdUI->Enable(!myOffsetDlg->IsWindowVisible());  
381                 else
382                         pCmdUI->Enable(TRUE);
383         else 
384                         pCmdUI->Enable(FALSE);
385         
386         
387 }
388
389 void CViewer3dDoc::OnUpdateCylinder(CCmdUI* pCmdUI) 
390 {
391         pCmdUI->Enable(myCylinder.IsNull()); 
392                 
393 }
394
395 void CViewer3dDoc::OnUpdateSphere(CCmdUI* pCmdUI) 
396 {
397         pCmdUI->Enable(mySphere.IsNull()); 
398                 
399 }
400
401 void CViewer3dDoc::OnUpdateBox(CCmdUI* pCmdUI) 
402 {
403         pCmdUI->Enable(myBox.IsNull()); 
404                 
405 }
406
407 void CViewer3dDoc::OnUpdateOverlappedCylinder(CCmdUI* pCmdUI) 
408 {
409         pCmdUI->Enable   (myOverlappedCylinder.IsNull()
410                                                 || myCylinder.IsNull());
411                 
412 }
413
414 void CViewer3dDoc::OnUpdateOverlappedSphere(CCmdUI* pCmdUI) 
415 {
416         pCmdUI->Enable   (myOverlappedSphere.IsNull()
417                                                 || mySphere.IsNull());
418 }
419
420 void CViewer3dDoc::OnUpdateOverlappedBox(CCmdUI* pCmdUI) 
421 {
422         pCmdUI->Enable   (myOverlappedBox.IsNull()
423                                                 || myBox.IsNull());
424 }
425
426 void CViewer3dDoc::OnObjectRemove() 
427
428 {
429
430         if(myAISContext->IsCurrent(myBox))
431                 myBox.Nullify();
432
433         if(myAISContext->IsCurrent(myCylinder))
434                 myCylinder.Nullify();
435
436         if(myAISContext->IsCurrent(mySphere))
437                 mySphere.Nullify();
438
439         if(myAISContext->IsCurrent(myOverlappedBox))
440                 myOverlappedBox.Nullify();
441
442         if(myAISContext->IsCurrent(myOverlappedCylinder))
443                 myOverlappedCylinder.Nullify();
444
445         if(myAISContext->IsCurrent(myOverlappedSphere))
446                 myOverlappedSphere.Nullify();
447
448         
449         for(myAISContext->InitCurrent();myAISContext->MoreCurrent();myAISContext->InitCurrent())
450                 myAISContext->Remove(myAISContext->Current(),Standard_True);
451
452         if(myOffsetDlg && myOffsetDlg->IsWindowVisible())
453                 myOffsetDlg->UpdateValues();
454
455 }
456
457 void CViewer3dDoc::OnObjectErase() 
458
459 {
460         OCC_3dBaseDoc::OnObjectErase(); 
461         if(myOffsetDlg && myOffsetDlg->IsWindowVisible())
462                 myOffsetDlg->UpdateValues();
463
464 }
465
466 void CViewer3dDoc::OnObjectDisplayall() 
467
468 {
469         OCC_3dBaseDoc::OnObjectDisplayall(); 
470         if(myOffsetDlg && myOffsetDlg->IsWindowVisible())
471                 myOffsetDlg->UpdateValues();
472
473 }
474
475 Handle_User_Cylinder CViewer3dDoc::GetCylinder()
476 {
477         return myCylinder;
478 }
479
480
481 Handle_AIS_Shape CViewer3dDoc::GetSphere()
482 {
483         return mySphere;
484 }
485
486 Handle_AIS_Shape CViewer3dDoc::GetBox()
487 {
488         return myBox;
489 }
490
491 Handle_AIS_Shape CViewer3dDoc::GetOverlappedCylinder()
492 {
493         return myOverlappedCylinder;
494 }
495
496
497 Handle_AIS_Shape CViewer3dDoc::GetOverlappedSphere()
498 {
499         return myOverlappedSphere;
500 }
501
502 Handle_AIS_Shape CViewer3dDoc::GetOverlappedBox()
503 {
504         return myOverlappedBox;
505 }
506
507 void CViewer3dDoc::DragEvent(const Standard_Integer  x        ,
508                                                   const Standard_Integer  y        ,
509                                                   const Standard_Integer  TheState ,
510                                   const Handle(V3d_View)& aView    )
511 {
512         OCC_3dBaseDoc::DragEvent(x,y, TheState,aView);
513         if(myOffsetDlg && myOffsetDlg->IsWindowVisible())
514                 myOffsetDlg->UpdateValues();
515 }
516
517 //-----------------------------------------------------------------------------------------
518 //
519 //-----------------------------------------------------------------------------------------
520 void CViewer3dDoc::InputEvent(const Standard_Integer  x     ,
521                                                    const Standard_Integer  y     ,
522                                    const Handle(V3d_View)& aView ) 
523 {
524         if(myOffsetDlg && myOffsetDlg->IsWindowVisible())
525                 myOffsetDlg->UpdateValues();
526
527         Quantity_Color CSFColor ;
528         COLORREF MSColor ;
529         myAISContext->Select(); 
530 // Change the color of a selected face in a user cylinder
531         if (myState == FACE_COLOR) {
532                 myAISContext->InitSelected();
533                 if (myAISContext->MoreSelected()) {
534                         //Handle_AIS_InteractiveObject Current = myAISContext->Current() ;
535                         Handle_AIS_InteractiveObject Current = myAISContext->SelectedInteractive() ;
536                         if ( Current->HasColor () ) {
537                         CSFColor = myAISContext->Color(Current);
538                         MSColor = RGB (CSFColor.Red()*255.,CSFColor.Green()*255.,CSFColor.Blue()*255.);
539                         }
540                         else {
541                                 MSColor = RGB ( 255,255,255 ) ;
542                         }
543     
544                         CColorDialog dlgColor(MSColor);
545                         if (dlgColor.DoModal() == IDOK) {
546                                 MSColor = dlgColor.GetColor();
547                                 CSFColor = Quantity_Color (GetRValue(MSColor)/255.,
548                                                                                    GetGValue(MSColor)/255.,
549                                                                                    GetBValue(MSColor)/255.,Quantity_TOC_RGB); 
550                                 TopoDS_Shape S = myAISContext->SelectedShape();
551                                 Handle(Geom_Surface) Surface = BRep_Tool::Surface(TopoDS::Face(S));
552                                 if (Surface->IsKind(STANDARD_TYPE(Geom_Plane)))
553                                         //Handle(User_Cylinder)::DownCast(myAISContext->Current())->SetPlanarFaceColor(CSFColor.Name());
554                                         Handle(User_Cylinder)::DownCast(myAISContext->SelectedInteractive())->SetPlanarFaceColor(CSFColor.Name());
555                                 else
556                                         //Handle(User_Cylinder)::DownCast(myAISContext->Current())->SetCylindricalFaceColor(CSFColor.Name());
557                                         Handle(User_Cylinder)::DownCast(myAISContext->SelectedInteractive())->SetCylindricalFaceColor(CSFColor.Name());
558                                 //myAISContext->Redisplay(myAISContext->Current());
559                                 myAISContext->Redisplay(myAISContext->SelectedInteractive());
560                                 myState = -1;
561                                 myAISContext->CloseLocalContext();
562                         }
563                 }
564   TCollection_AsciiString Message ("\
565   TopoDS_Shape S = myAISContext->SelectedShape();  \n\
566   \n\
567   Handle(Geom_Surface) Surface = BRep_Tool::Surface(TopoDS::Face(S));  \n\
568   \n\
569   if (Surface->IsKind(STANDARD_TYPE(Geom_Plane)))  \n\
570         Handle(User_Cylinder)::DownCast(myAISContext->Current())->SetPlanarFaceColor(CSFColor.Name());  \n\
571   else  \n\
572         Handle(User_Cylinder)::DownCast(myAISContext->Current())->SetCylindricalFaceColor(CSFColor.Name());  \n\
573   \n\
574   myAISContext->Redisplay(myAISContext->Current());  \n\
575   \n\
576   myAISContext->CloseLocalContext();  \n\
577   \n\
578   \n\
579   NOTE: a User_Cylinder is an object defined by the user.  \n\
580   The User_Cylinder class inherit from the AIS_InteractiveObject   \n\
581   Cascade class, it's use is the same as an AIS_InteractiveObject.   \n\
582   Methods SetPlanarFaceColor and SetCylindricalFaceColor are also  \n\
583   defined in the User_Cylinder class.   \n\
584   \n");
585   
586         CString text(Message.ToCString());
587         myCResultDialog.SetTitle(CString("Change face color"));
588         myCResultDialog.SetText(text);
589         SetTitle(CString("Change face color"));
590   
591         }
592 }
593
594
595 //-----------------------------------------------------------------------------------------
596 //
597 //-----------------------------------------------------------------------------------------
598 void CViewer3dDoc::ShiftDragEvent(const Standard_Integer  x        ,
599                                                                            const Standard_Integer  y        ,
600                                                                            const Standard_Integer  TheState ,
601                                        const Handle(V3d_View)& aView    ) 
602 {
603     OCC_3dBaseDoc::ShiftDragEvent(x,y,TheState,aView);
604         if(myOffsetDlg && myOffsetDlg->IsWindowVisible())
605                 myOffsetDlg->UpdateValues();
606 }
607
608
609 //-----------------------------------------------------------------------------------------
610 //
611 //-----------------------------------------------------------------------------------------
612
613 void CViewer3dDoc::ShiftInputEvent(const Standard_Integer  x       ,
614                                                                             const Standard_Integer  y       ,
615                                         const Handle(V3d_View)& aView   ) 
616 {
617     OCC_3dBaseDoc::ShiftInputEvent(x,y,aView);
618         if(myOffsetDlg && myOffsetDlg->IsWindowVisible())
619                 myOffsetDlg->UpdateValues();
620
621 }
622
623 void CViewer3dDoc::OnObjectColoredMesh() 
624 {
625   for(myAISContext->InitCurrent();myAISContext->MoreCurrent();myAISContext->NextCurrent())
626           if (myAISContext->Current()->IsKind(STANDARD_TYPE(User_Cylinder))){
627                 myAISContext->ClearPrs(myAISContext->Current(),6,Standard_False);
628                         myAISContext->RecomputePrsOnly(myAISContext->Current(),Standard_False);
629                         myAISContext->SetDisplayMode(myAISContext->Current(),6);
630           }
631         
632 }
633
634 void CViewer3dDoc::OnUpdateObjectColoredMesh(CCmdUI* pCmdUI) 
635 {
636   bool CylinderIsCurrentAndDisplayed = false;
637   for (myAISContext->InitCurrent();myAISContext->MoreCurrent ();myAISContext->NextCurrent ())
638     //if ((myAISContext->IsDisplayed(myAISContext->Current(),1) || myAISContext->IsDisplayed(myAISContext->Current(),0))
639         //      && myAISContext->Current()->IsKind(STANDARD_TYPE(User_Cylinder))) 
640         if(myAISContext->Current()->IsKind(STANDARD_TYPE(User_Cylinder)))
641                 CylinderIsCurrentAndDisplayed=true;
642   pCmdUI->Enable (CylinderIsCurrentAndDisplayed);       
643         
644 }
645
646 void CViewer3dDoc::OnUpdateObjectWireframe(CCmdUI* pCmdUI) 
647 {
648   bool OneOrMoreInShadingOrColoredMesh = false;
649   for (myAISContext->InitCurrent();myAISContext->MoreCurrent ();myAISContext->NextCurrent ())
650     if (myAISContext->IsDisplayed(myAISContext->Current(),1) || myAISContext->IsDisplayed(myAISContext->Current(),6)) 
651                 OneOrMoreInShadingOrColoredMesh=true;
652         pCmdUI->Enable (OneOrMoreInShadingOrColoredMesh);       
653 }
654
655
656 void CViewer3dDoc::OnUpdateObjectShading(CCmdUI* pCmdUI) 
657 {
658   bool OneOrMoreInWireframeOrColoredMesh = false;
659   for (myAISContext->InitCurrent();myAISContext->MoreCurrent ();myAISContext->NextCurrent ())
660     if (myAISContext->IsDisplayed(myAISContext->Current(),0) || myAISContext->IsDisplayed(myAISContext->Current(),6))
661                 OneOrMoreInWireframeOrColoredMesh=true;
662         pCmdUI->Enable (OneOrMoreInWireframeOrColoredMesh);     
663 }
664
665
666 void CViewer3dDoc::OnOptionsTrihedronDynamicTrihedron() 
667 {
668         if (myAISContext -> IsDisplayed(myTrihedron))
669         {
670                 myAISContext->Remove(myTrihedron);
671         }               
672         else
673         {
674                 Handle(Geom_Axis2Placement) myTrihedronAxis=new Geom_Axis2Placement(gp::XOY());
675                 myTrihedron=new AIS_Trihedron(myTrihedronAxis);
676                 myAISContext->SetTrihedronSize(200, Standard_True);
677                 myAISContext->Display(myTrihedron);     
678         }               
679 }
680
681 void CViewer3dDoc::OnUpdateOptionsTrihedronDynamicTrihedron(CCmdUI* pCmdUI) 
682 {
683         if (myAISContext->IsDisplayed(myTrihedron))
684                 pCmdUI->SetCheck(1);
685         else
686                 pCmdUI->SetCheck(0);
687 }
688
689 void CViewer3dDoc::SetMyStaticTrihedronAxisIsDisplayed(BOOL IsDisplayed)
690 {
691         myStaticTrihedronAxisIsDisplayed = IsDisplayed;
692 }
693
694 void CViewer3dDoc::OnUpdateOptionsTrihedronStaticTrihedron(CCmdUI* pCmdUI) 
695 {
696         if (myStaticTrihedronAxisIsDisplayed)
697                 pCmdUI->SetCheck(1);
698         else
699                 pCmdUI->SetCheck(0);
700         
701 }
702
703 /*
704 void CViewer3dDoc::OnUpdateObjectColor(CCmdUI* pCmdUI) 
705 {
706   bool OneOrMoreInShadingOrWireframe = false;
707   for (myAISContext->InitCurrent();myAISContext->MoreCurrent ();myAISContext->NextCurrent ())
708     if (myAISContext->IsDisplayed(myAISContext->Current(),1)
709                 || myAISContext->IsDisplayed(myAISContext->Current(),0)) 
710                 OneOrMoreInShadingOrWireframe = true;
711   pCmdUI->Enable (OneOrMoreInShadingOrWireframe);       
712         
713 }
714 */
715
716 void  CViewer3dDoc::Popup( const Standard_Integer  x,
717                                                    const Standard_Integer  y ,
718                            const Handle(V3d_View)& aView   ) 
719 {
720   Standard_Integer PopupMenuNumber=0;
721  myAISContext->InitCurrent();
722   if (myAISContext->MoreCurrent()) {
723                 if (myAISContext->Current()->IsKind(STANDARD_TYPE(User_Cylinder)))
724                         return;
725                 else 
726                         PopupMenuNumber = 1;
727         }
728
729   CMenu menu;
730   VERIFY(menu.LoadMenu(IDR_Popup3D));
731   CMenu* pPopup = menu.GetSubMenu(PopupMenuNumber);
732
733   ASSERT(pPopup != NULL);
734    if (PopupMenuNumber == 1) // more than 1 object.
735   {
736     bool OneOrMoreInShading = false;
737         for (myAISContext->InitCurrent();myAISContext->MoreCurrent ();myAISContext->NextCurrent ())
738     if (myAISContext->IsDisplayed(myAISContext->Current(),1)) OneOrMoreInShading=true;
739         if(!OneOrMoreInShading)
740         pPopup->EnableMenuItem(5, MF_BYPOSITION | MF_DISABLED | MF_GRAYED);
741    }
742
743   POINT winCoord = { x , y };
744   Handle(WNT_Window) aWNTWindow=
745   Handle(WNT_Window)::DownCast(aView->Window());
746   ClientToScreen ( (HWND)(aWNTWindow->HWindow()),&winCoord);
747   pPopup->TrackPopupMenu(TPM_LEFTALIGN | TPM_RIGHTBUTTON , winCoord.x, winCoord.y , 
748                          AfxGetMainWnd());
749 }
750 //Set faces selection mode
751 void CViewer3dDoc::OnFaces() 
752 {
753         myAISContext->CloseAllContexts();
754         myAISContext->OpenLocalContext();
755         myAISContext->ActivateStandardMode(TopAbs_FACE);
756
757 TCollection_AsciiString Message ("\
758 myAISContext->OpenLocalContext();  \n\
759 \n\
760 myAISContext->ActivateStandardMode(TopAbs_FACE);  \n\
761 \n");
762
763         CString text(Message.ToCString());
764         myCResultDialog.SetTitle(CString("Standard mode: TopAbs_FACE"));
765         myCResultDialog.SetText(text);
766         SetTitle(CString("Standard mode: TopAbs_FACE"));
767 }
768
769 //Set edges selection mode
770 void CViewer3dDoc::OnEdges() 
771 {
772         myAISContext->CloseAllContexts();
773         myAISContext->OpenLocalContext();
774         myAISContext->ActivateStandardMode(TopAbs_EDGE);        
775
776 TCollection_AsciiString Message ("\
777 myAISContext->OpenLocalContext();  \n\
778 \n\
779 myAISContext->ActivateStandardMode(TopAbs_EDGE);  \n\
780 \n");
781
782         CString text(Message.ToCString());
783         myCResultDialog.SetTitle(CString("Standard mode: TopAbs_EDGE"));
784         myCResultDialog.SetText(text);
785         SetTitle(CString("Standard mode: TopAbs_EDGE"));
786 }
787
788 // Set vertices selection mode
789 void CViewer3dDoc::OnVertices() 
790 {
791         myAISContext->CloseAllContexts();
792         myAISContext->OpenLocalContext();
793         myAISContext->ActivateStandardMode(TopAbs_VERTEX);      
794
795 TCollection_AsciiString Message ("\
796 myAISContext->OpenLocalContext();  \n\
797 \n\
798 myAISContext->ActivateStandardMode(TopAbs_VERTEX);  \n\
799 \n");
800
801         CString text(Message.ToCString());
802         myCResultDialog.SetTitle(CString("Standard mode: TopAbs_VERTEX"));
803         myCResultDialog.SetText(text);
804         SetTitle(CString("Standard mode: TopAbs_VERTEX"));
805 }
806
807 //Neutral selection mode
808 void CViewer3dDoc::OnNeutral() 
809 {
810         myAISContext->CloseAllContexts();       
811
812 TCollection_AsciiString Message ("\
813 myAISContext->CloseAllContexts();  \n\
814 \n");
815
816         CString text(Message.ToCString());
817         myCResultDialog.SetTitle(CString("Standard mode: Neutral"));
818         myCResultDialog.SetText(text);
819         SetTitle(CString("Standard mode: Neutral"));
820 }
821
822 // Change the color of faces on a user cylinder
823 void CViewer3dDoc::OnUsercylinderChangefacecolor() 
824 {
825         myAISContext->OpenLocalContext();
826         myAISContext->Activate(myAISContext->Current(),4);
827         myState = FACE_COLOR;
828 // see the following of treatment in inputevent
829 }
830
831 // Make 3d fillets on solids
832 // It is necessary to activate the edges selection mode and select edges on an object
833 // before running this function
834 void CViewer3dDoc::OnFillet3d() 
835 {
836     if( !myAISContext->HasOpenedContext())
837     {
838         AfxMessageBox("It is necessary to activate the edges selection mode\n\
839 and select edges on an object before \nrunning this function");
840         return;
841     }
842     
843         myAISContext->InitSelected();
844         if (myAISContext->MoreSelected()) {     
845                         Handle(AIS_Shape) S = Handle(AIS_Shape)::DownCast(myAISContext->SelectedInteractive());
846                         
847                         if (S.IsNull()){
848                                 AfxMessageBox("It is necessary to activate the edges selection mode\n\
849 and select edges on an object before \nrunning this function");
850                                 return;
851                         }
852                 
853                         TopoDS_Shape Sh=S->Shape();
854         
855                         BRepFilletAPI_MakeFillet aFillet(Sh);
856                                 
857                         for (myAISContext->InitSelected(); myAISContext->MoreSelected(); myAISContext->NextSelected())                                                          
858                         {
859                 TopoDS_Edge anEdge;
860                                 try {
861                                         anEdge=TopoDS::Edge(myAISContext->SelectedShape());
862                                 }
863                     catch(Standard_Failure)
864                         {
865                                 }
866                                 
867                                 if (anEdge.IsNull())
868                 {
869                     AfxMessageBox("It is necessary to activate the edges selection mode\n\
870 and select edges on an object before \nrunning this function");
871                     return;
872                 }
873                         }
874
875                         BoxRadius dlg(NULL,10.);
876                         if (dlg.DoModal() == IDOK){
877                                 for (myAISContext->InitSelected(); myAISContext->MoreSelected(); myAISContext->NextSelected()){
878                 TopoDS_Edge anEdge = TopoDS::Edge(myAISContext->SelectedShape());
879                                 aFillet.Add(dlg.m_radius,anEdge);
880                                 }
881                         }
882                         else return;
883
884             TopoDS_Shape aNewShape;
885 //            if(!aFillet.IsDone())
886             try{
887                aNewShape = aFillet.Shape();
888             }
889             catch(Standard_Failure)
890             {
891                AfxMessageBox("Error During Fillet computation");
892                return;
893             }
894             S ->Set(aNewShape);
895                         myAISContext->Redisplay(S);                                             
896                         
897         }
898 TCollection_AsciiString Message ("\
899 Handle(AIS_Shape) S = Handle(AIS_Shape)::DownCast(myAISContext->Interactive());  \n\
900 \n\
901 BRepAPI_MakeFillet aFillet(S->Shape());   \n\
902 \n\
903 TopoDS_Edge anEdge=TopoDS::Edge(myAISContext->SelectedShape());  \n\
904 \n\
905 aFillet.Add(dlg.m_radius,anEdge);  \n\
906 \n\
907 TopoDS_Shape aNewShape = aFillet.Shape();  \n\
908 \n\
909 S ->Set(aNewShape);  \n\
910 \n\
911 myAISContext->Redisplay(S);  \n\
912 \n");
913
914         CString text(Message.ToCString());
915         myCResultDialog.SetTitle(CString("Make a fillet"));
916         myCResultDialog.SetText(text);
917         SetTitle(CString("Make a fillet"));
918 }
919 // Create and display a circle with standard tools
920 void CViewer3dDoc::OnCircle() 
921 {
922         gp_Ax2 ax2(gp_Pnt(0., 0., 0.), gp_Dir(0., 0., -1.));
923         Handle(Geom_Circle) C = new Geom_Circle(ax2, 300);
924 //      GC_MakeCircle C(gp_Pnt(-100.,-300.,0.),gp_Pnt(-50.,-200.,0.),gp_Pnt(-10.,-250.,0.));
925 //      Handle(AIS_Circle) anAISCirc = new AIS_Circle(C.Value());
926         Handle(AIS_Circle) anAISCirc = new AIS_Circle(C);
927         myAISContext->Display(anAISCirc);
928
929 TCollection_AsciiString Message ("\
930 GC_MakeCircle C(gp_Pnt(-100.,-300.,0.),gp_Pnt(-50.,-200.,0.),gp_Pnt(-10.,-250.,0.));  \n\
931 \n\
932 Handle(AIS_Circle) anAISCirc = new AIS_Circle(C.Value());  \n\
933 \n\
934 myAISContext->Display(anAISCirc);  \n\
935 \n");
936
937         CString text(Message.ToCString());
938         myCResultDialog.SetTitle(CString("Create a circle"));
939         myCResultDialog.SetText(text);
940         SetTitle(CString("Create a circle"));
941 }
942
943 void CViewer3dDoc::OnLine() 
944 {
945         // TODO: Add your command handler code here
946         gp_Lin L(gp_Pnt(0.,0.,0.),gp_Dir(1.,0.,0.));
947         Handle(Geom_Line) aLine = new Geom_Line(L);
948         Handle(AIS_Line) anAISLine = new AIS_Line(aLine);
949         myAISContext->Display(anAISLine);       
950
951 TCollection_AsciiString Message ("\
952 gp_Lin L(gp_Pnt(0.,0.,0.),gp_Dir(1.,0.,0.));  \n\
953 \n\
954 Handle(Geom_Line) aLine = new Geom_Line(L);  \n\
955 \n\
956 Handle(AIS_Line) anAISLine = new AIS_Line(aLine); \n\
957 \n\
958 myAISContext->Display(anAISLine);  \n\
959 \n");
960
961         CString text(Message.ToCString());
962         myCResultDialog.SetTitle(CString("Create a line"));
963         myCResultDialog.SetText(text);
964         SetTitle(CString("Create a line"));
965 }
966
967 void CViewer3dDoc::OnNbisos() 
968 {
969         int nu = myAISContext->DefaultDrawer()->UIsoAspect()->Number();
970         int nv = myAISContext->DefaultDrawer()->VIsoAspect()->Number();
971         DlgIsos dlg(NULL,nu,nv);
972         if (dlg.DoModal() == IDOK) {
973                 myAISContext->DefaultDrawer()->UIsoAspect()->SetNumber(dlg.m_isou);
974                 myAISContext->DefaultDrawer()->VIsoAspect()->SetNumber(dlg.m_isov);
975
976 TCollection_AsciiString Message ("\
977 myAISContext->DefaultDrawer()->UIsoAspect()->SetNumber(dlg.m_isou);  \n\
978 \n\
979 myAISContext->DefaultDrawer()->VIsoAspect()->SetNumber(dlg.m_isov);  \n\
980 \n");
981
982         CString text(Message.ToCString());
983         myCResultDialog.SetTitle(CString("Iso Aspect"));
984         myCResultDialog.SetText(text);
985         SetTitle(CString("Iso Aspect"));
986
987         }
988 }
989
990 BOOL CViewer3dDoc::OnNewDocument()
991 {
992         if (!CDocument::OnNewDocument())
993                 return FALSE;
994
995         // TODO: add reinitialization code here
996         // (SDI documents will reuse this document)
997   SetTitle(myPresentation->GetName());
998
999   myAISContext->EraseAll(Standard_False);
1000   myAISContext->SetDisplayMode(AIS_Shaded);
1001
1002   POSITION pos = GetFirstViewPosition();
1003   while (pos != NULL)
1004   {
1005     CViewer3dView* pView = (CViewer3dView*) GetNextView(pos);
1006     pView->Reset();
1007   }  
1008
1009         return TRUE;
1010 }
1011
1012 void CViewer3dDoc::OnFileNew()
1013 {
1014   OnNewDocument();
1015 }
1016
1017 void CViewer3dDoc::InitViewButtons()
1018 {
1019   POSITION pos = GetFirstViewPosition();
1020   while (pos != NULL)
1021   {
1022     CViewer3dView* pView = (CViewer3dView*) GetNextView(pos);
1023     pView->InitButtons();
1024   }
1025 }
1026
1027 void CViewer3dDoc::OnTextureOn()
1028 {
1029         isTextureSampleStarted = TRUE;
1030         Start();
1031 }
1032
1033 void CViewer3dDoc::DoSample()
1034 {
1035   InitViewButtons();
1036
1037   HCURSOR hOldCursor = ::GetCursor();
1038   HCURSOR hNewCursor = AfxGetApp()->LoadStandardCursor(IDC_APPSTARTING);
1039
1040   SetCursor(hNewCursor);
1041   {
1042     try
1043     {
1044       myPresentation->DoSample();
1045     }
1046     catch (Standard_Failure)
1047     {
1048       Standard_SStream aSStream;
1049       aSStream << "An exception was caught: " << Standard_Failure::Caught() << ends;
1050       Standard_CString aMsg = aSStream.str().c_str();
1051 //      aSStream.rdbuf()->freeze(0);   // allow deletion of dynamic array
1052       AfxMessageBox (aMsg);
1053     }
1054   }
1055   SetCursor(hOldCursor);
1056 }
1057
1058 void CViewer3dDoc::OnBUTTONStart() 
1059 {
1060   myAISContext->EraseAll(Standard_False);
1061   myPresentation->FirstSample();
1062   DoSample();
1063 }
1064
1065 void CViewer3dDoc::OnBUTTONEnd()
1066 {
1067   myAISContext->EraseAll(Standard_False);
1068   myPresentation->LastSample();
1069   DoSample();
1070 }
1071
1072 void CViewer3dDoc::OnBUTTONRepeat() 
1073 {
1074   DoSample();
1075 }
1076
1077 void CViewer3dDoc::OnBUTTONNext() 
1078 {
1079   if (!myPresentation->AtLastSample())
1080   {
1081     myPresentation->NextSample();
1082     DoSample();
1083   }
1084 }
1085
1086 void CViewer3dDoc::OnBUTTONPrev() 
1087 {
1088   if (!myPresentation->AtFirstSample())
1089   {
1090     myPresentation->PrevSample();
1091     DoSample();
1092   }
1093 }
1094
1095 void CViewer3dDoc::OnUpdateBUTTONNext(CCmdUI* pCmdUI) 
1096 {
1097         if ( isTextureSampleStarted )
1098                 pCmdUI->Enable (!myPresentation->AtLastSample());
1099         else
1100                 pCmdUI->Enable (FALSE);
1101 }
1102
1103 void CViewer3dDoc::OnUpdateBUTTONPrev(CCmdUI* pCmdUI) 
1104 {
1105         if ( isTextureSampleStarted )
1106                 pCmdUI->Enable (!myPresentation->AtFirstSample());
1107         else
1108                 pCmdUI->Enable (FALSE);
1109 }
1110
1111 void CViewer3dDoc::OnUpdateBUTTONStart(CCmdUI* pCmdUI) 
1112 {
1113         pCmdUI->Enable (isTextureSampleStarted);
1114 }
1115
1116 void CViewer3dDoc::OnUpdateBUTTONRepeat(CCmdUI* pCmdUI) 
1117 {
1118         pCmdUI->Enable (isTextureSampleStarted);
1119 }
1120
1121 void CViewer3dDoc::OnUpdateBUTTONEnd(CCmdUI* pCmdUI) 
1122 {
1123         pCmdUI->Enable (isTextureSampleStarted);
1124 }
1125
1126 void CViewer3dDoc::OnDumpView() 
1127 {
1128   // save current directory and restore it on exit
1129   char aCurPath[MAX_PATH];
1130   ::GetCurrentDirectory(MAX_PATH, aCurPath);
1131
1132   ::SetCurrentDirectory(myLastPath);
1133
1134   CFileDialog *aDlg = new CFileDialog(false, "gif", "OCCView.gif", 
1135     OFN_HIDEREADONLY | OFN_OVERWRITEPROMPT, "GIF Files (*.gif)|*.gif||", NULL);
1136
1137   int result = aDlg->DoModal();
1138   if ( result == IDOK) 
1139   {
1140     CString aFileName = aDlg->GetFileName();
1141     delete aDlg;
1142
1143     POSITION pos = GetFirstViewPosition();
1144     while (pos != NULL)
1145     {
1146       CViewer3dView* pView = (CViewer3dView*) GetNextView(pos);
1147       pView->UpdateWindow();
1148     }       
1149
1150     myViewer->InitActiveViews();
1151     Handle(V3d_View) aView = myViewer->ActiveView();
1152     char aStrFileName[MAX_PATH];
1153     strcpy_s(aStrFileName, aFileName);
1154     aView->Dump(aStrFileName);
1155   }
1156   else 
1157     delete aDlg;
1158   
1159   ::GetCurrentDirectory(MAX_PATH, myLastPath);
1160   ::SetCurrentDirectory(aCurPath);
1161 }
1162
1163 void CViewer3dDoc::Start()
1164 {
1165   myPresentation->Init();
1166   OnBUTTONStart();
1167 }
1168
1169 void CViewer3dDoc::Fit()
1170 {
1171         CMDIFrameWnd *pFrame =  (CMDIFrameWnd*)AfxGetApp()->m_pMainWnd;
1172         CMDIChildWnd *pChild =  (CMDIChildWnd *) pFrame->GetActiveFrame();
1173         CViewer3dView *pView = (CViewer3dView *) pChild->GetActiveView();
1174         pView->FitAll();
1175 }