Hakemisto hukassa

Tree kirjoitti:

Missähän mahtaa olla vika, kun yhdistelmäruudussa ei näy hakemistoja, eikä puukontrollissa ole hakemiston tiedostoja?

Tässä lopussa Visual C 6.0:n koodi, joka menee kyllä kääntäjästä virheittä läpi, mutta ei silti toimi:

// ListsDlg.cpp : implementation file
//

#include "stdafx.h"
#include "Lists.h"
#include "ListsDlg.h"

#ifdef _DEBUG
#define new DEBUG_NEW
#undef THIS_FILE
static char THIS_FILE[] = __FILE__;
#endif

/////////////////////////////////////////////////////////////////////////////
// CAboutDlg dialog used for App About

class CAboutDlg : public CDialog
{
public:
   CAboutDlg();

// Dialog Data
   //{{AFX_DATA(CAboutDlg)
   enum { IDD = IDD_ABOUTBOX };
   //}}AFX_DATA

   // ClassWizard generated virtual function overrides
   //{{AFX_VIRTUAL(CAboutDlg)
   protected:
   virtual void DoDataExchange(CDataExchange* pDX); // DDX/DDV support
   //}}AFX_VIRTUAL

// Implementation
protected:
   //{{AFX_MSG(CAboutDlg)
   //}}AFX_MSG
   DECLARE_MESSAGE_MAP()
};

CAboutDlg::CAboutDlg() : CDialog(CAboutDlg::IDD)
{
   //{{AFX_DATA_INIT(CAboutDlg)
   //}}AFX_DATA_INIT
}

void CAboutDlg::DoDataExchange(CDataExchange* pDX)
{
   CDialog::DoDataExchange(pDX);
   //{{AFX_DATA_MAP(CAboutDlg)
   //}}AFX_DATA_MAP
}

BEGIN_MESSAGE_MAP(CAboutDlg, CDialog)
   //{{AFX_MSG_MAP(CAboutDlg)
      // No message handlers
   //}}AFX_MSG_MAP
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CListsDlg dialog

CListsDlg::CListsDlg(CWnd* pParent /*=NULL*/)
   : CDialog(CListsDlg::IDD, pParent)
{
   //{{AFX_DATA_INIT(CListsDlg)
      // NOTE: the ClassWizard will add member initialization here
   //}}AFX_DATA_INIT
   // Note that LoadIcon does not require a subsequent DestroyIcon in Win32
   m_hIcon = AfxGetApp()->LoadIcon(IDR_MAINFRAME);
}

void CListsDlg::DoDataExchange(CDataExchange* pDX)
{
   CDialog::DoDataExchange(pDX);
   //{{AFX_DATA_MAP(CListsDlg)
   DDX_Control(pDX, IDC_SELECTED_DIRS, m_lcDirDetails);
   DDX_Control(pDX, IDC_SUB_DIRS, m_lbSubDirs);
   DDX_Control(pDX, IDC_FILES_TREE, m_treeFiles);
   DDX_Control(pDX, IDC_MAIN_DIR, m_cbMainDir);
   //}}AFX_DATA_MAP
}

BEGIN_MESSAGE_MAP(CListsDlg, CDialog)
   //{{AFX_MSG_MAP(CListsDlg)
   ON_WM_SYSCOMMAND()
   ON_WM_PAINT()
   ON_WM_QUERYDRAGICON()
   ON_CBN_SELCHANGE(IDC_MAIN_DIR, OnSelchangeMainDir)
   //}}AFX_MSG_MAP
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CListsDlg message handlers

BOOL CListsDlg::OnInitDialog()
{
   CDialog::OnInitDialog();

   // Add "About..." menu item to system menu.

   // IDM_ABOUTBOX must be in the system command range.
   ASSERT((IDM_ABOUTBOX & 0xFFF0) == IDM_ABOUTBOX);
   ASSERT(IDM_ABOUTBOX < 0xF000);

   CMenu* pSysMenu = GetSystemMenu(FALSE);
   if (pSysMenu != NULL)
   {
      CString strAboutMenu;
      strAboutMenu.LoadString(IDS_ABOUTBOX);
      if (!strAboutMenu.IsEmpty())
      {
         pSysMenu->AppendMenu(MF_SEPARATOR);
         pSysMenu->AppendMenu(MF_STRING, IDM_ABOUTBOX, strAboutMenu);
      }
   }

   // Set the icon for this dialog. The framework does this automatically
   // when the application's main window is not a dialog
   SetIcon(m_hIcon, TRUE);         // Set big icon
   SetIcon(m_hIcon, FALSE);      // Set small icon
   
   // TODO: Add extra initialization here
   // ** Initialize the main directory combo box
   PopulateCombo();
   
   return TRUE; // return TRUE unless you set the focus to a control
}

void CListsDlg::OnSysCommand(UINT nID, LPARAM lParam)
{
   if ((nID & 0xFFF0) == IDM_ABOUTBOX)
   {
      CAboutDlg dlgAbout;
      dlgAbout.DoModal();
   }
   else
   {
      CDialog::OnSysCommand(nID, lParam);
   }
}

// If you add a minimize button to your dialog, you will need the code below
// to draw the icon. For MFC applications using the document/view model,
// this is automatically done for you by the framework.

void CListsDlg::OnPaint()
{
   if (IsIconic())
   {
      CPaintDC dc(this); // device context for painting

      SendMessage(WM_ICONERASEBKGND, (WPARAM) dc.GetSafeHdc(), 0);

      // Center icon in client rectangle
      int cxIcon = GetSystemMetrics(SM_CXICON);
      int cyIcon = GetSystemMetrics(SM_CYICON);
      CRect rect;
      GetClientRect(&rect);
      int x = (rect.Width() - cxIcon 1) / 2;
      int y = (rect.Height() - cyIcon 1) / 2;

      // Draw the icon
      dc.DrawIcon(x, y, m_hIcon);
   }
   else
   {
      CDialog::OnPaint();
   }
}

// The system calls this to obtain the cursor to display while the user drags
// the minimized window.
HCURSOR CListsDlg::OnQueryDragIcon()
{
   return (HCURSOR) m_hIcon;
}

void CListsDlg::PopulateCombo()
{
   TCHAR szBuffer[MAX_PATH];

   // ** Get the Windows Directory, usually C:\Windows
   // ** and add to the combo box
   GetWindowsDirectory(szBuffer, MAX_PATH);
   m_cbMainDir.AddString(szBuffer);

   // ** Chop off the directory to leave the drive letter C:
   // ** and add to the combo box
   szBuffer[2]=0;
   m_cbMainDir.AddString(szBuffer);

   // ** Get the System Directory, usually C:\Windows\System
   // ** and add to the combo box
   GetSystemDirectory(szBuffer, MAX_PATH);
   m_cbMainDir.AddString(szBuffer);

   // ** Get the present directory and add to the combo box
   GetCurrentDirectory(MAX_PATH, szBuffer);
   m_cbMainDir.AddString(szBuffer);

}

void CListsDlg::OnSelchangeMainDir()
{
   // TODO: Add your control notification handler code here
   // ** Retrieve the index of the selected item
   int nIndex = m_cbMainDir.GetCurSel();

   // ** Check the index is valid
   if(nIndex != CB_ERR)
   {
      // ** Get the text of the selected item and store in a
      // ** member variable and call functions to populate
      // ** the other controls
      m_cbMainDir.GetLBText(nIndex, m_strMainDir);
      PopulateTree();
   }   
}

void CListsDlg::PopulateTree()
{
   // ** Remove all existing tree items
   m_treeFiles.DeleteAllItems();

   // ** Allocate an array of HTREEITEMS
   HTREEITEM hLetter[27];

   // ** Insert items 'A' through 'Z' as root items
   for(int nChar = 'A'; nChar

kirjoitti:

Anonyymi

Kirjoita kommentti

5000

Lähetä