Changeset 951 for trunk/MagicSoft/Mars/mmain/MBrowser.cc

Timestamp:

09/27/01 12:06:22 (23 years ago)

Author:

tbretz

Message:

*** empty log message ***

File:

• trunk/MagicSoft/Mars/mmain/MBrowser.cc (modified) (6 diffs)

trunk/MagicSoft/Mars/mmain/MBrowser.cc

@@ -105 +105 @@
     fDir->Resize(350, 20);
 
+    //
+    // Get the three picturs from the system (must be deleted by FreePicture)
+    //
     fPic1 = fClient->GetPicture("tb_uplevel.xpm");
     fPic2 = fClient->GetPicture("tb_list.xpm");
     fPic3 = fClient->GetPicture("tb_details.xpm");
 
+    //
+    // Create the corresponding picture buttons
+    //
     fCdup     = new TGPictureButton(frame, fPic1, M_PBUTTON_CDIR_UP);
     fListMode = new TGPictureButton(frame, fPic2, M_PBUTTON_LIST_MODE);
     fDetail   = new TGPictureButton(frame, fPic3, M_PBUTTON_DETAIL_MODE);
 
+    //
+    // setup the buttons
+    //
     fCdup    ->SetToolTipText("One Level up!");
     fListMode->SetToolTipText("List Mode");
@@ -123 +132 @@
     fDetail  ->AllowStayDown(kTRUE);
 
+    //
+    // send messages to 'this' object
+    //
     fDir     ->Associate(this);
     fCdup    ->Associate(this);
@@ -128 +140 @@
     fListMode->Associate(this);
 
+    //
+    // Add to list for 'automatic' deletion
+    //
     fList->Add(fDir);
     fList->Add(fCdup);
@@ -134 +149 @@
 
     //
-    // Layout Dir-Listbox and buttons
-    //
-    TGLayoutHints *laydir = new TGLayoutHints(kLHintsTop|kLHintsLeft|kLHintsExpandX, 5, 5, 5, 5);
-    TGLayoutHints *laybut = new TGLayoutHints(kLHintsLeft|kLHintsTop, 5, 5, 5, 5);
-
-    fList->Add(laydir);
-    fList->Add(laybut);
-
-    frame->AddFrame(fDir,      laydir);
-    frame->AddFrame(fCdup,     laybut);
-    frame->AddFrame(fListMode, laybut);
-    frame->AddFrame(fDetail,   laybut);
+    // Layout Dir-Listbox and buttons in one row (frame)
+    //
+    //  - layout:
+    //    alignment: top, left
+    //    padding:   5, 5, 5, 5
+    //
+    TGLayoutHints *layout = new TGLayoutHints(kLHintsNormal, 5, 5, 5, 5);
+    fList->Add(layout);
+
+    frame->AddFrame(fDir,      layout);
+    frame->AddFrame(fCdup,     layout);
+    frame->AddFrame(fListMode, layout);
+    frame->AddFrame(fDetail,   layout);
 }
 
@@ -239 +255 @@
     fInputFile[0] = '\0';
 
-    fList = new TList;
     fList->SetOwner();
 
@@ -293 +308 @@
     fClient->FreePicture(fPic2);
     fClient->FreePicture(fPic3);
-
-    delete fList;
 }