Курсовая работа: Файловый менеджер

}

}

TTreeNode* TForm1::AddChildInNodeTree(TTreeNode *Node, AnsiString Dir)

{

AnsiString temp=Dir;

AnsiString Name=ExtractFileName(temp.SetLength(temp.Length()-1));

FirstUpOtherDown(Name);

AnsiString *p=new AnsiString(Dir); //Добавляемновыйпотомокк treeview

TTreeNode *t=TreeView1->Items->AddChildObject(Node,Name,p);

t->ImageIndex=ImageCloseFolder;

t->SelectedIndex=ImageOpenFolder;

return t; //Возвращаем указатель на него

}

void TForm1::ViewChild(TTreeNode *Node) //Отображение детей узла в treeview

{

//Перебор детей открывамого узла

TTreeNode *child=Node->getFirstChild();

TSearchRec sr;

AnsiString dir,name;

do

{

dir=*((AnsiString *)child->Data);

//Проверка диска на гибкую дискету и вообще отсут?