Fra Filelistbox til Filelistbox

Kan du gøre følgende:

FileListBox1Click()
{
  FileListBox2->Directory = FileListBox1->FileName;
}

Du må nok være lidt mere specifik. Er det alle dine directories der skal kopieres over i din anden filelistbox eller er de filer der i mappen eller hvordan?

akempff-> Jeg har i FileListBox en liste over alle directories i en mappe, det jeg vil er nu ved at klikke på en af mapperne, få vist filerne fra den angivende mappe i en anden FileListBox

jakobdo-> Det virker ikke.... når jeg kører programmet og forsøger at klikke på en af mapperne, melder den "File not found"

I know!
Hvorfor ikke bare bruge en DirectoryListBox ???
Det er jo rimelig nemt at have med at gøre.

Hvis jeg skal bruge den, ville jeg gerne have mulighed for at få skjult "mappeikonerne" i siden
og måske hvis muligt, at få skjult dele af stien :)

Problemet er at der bliver sat [ og ] om directory navne, så de skal klippes væk, og har ikke lige mere tid til at hjælpe...

Her er noget, men det kan sikkert gøres lidt mere elegant hvis du leger lidt med det.

  FileListBox2->Directory = FileListBox1->Directory;
  FileListBox2->Directory = ExtractFileName(FileListBox1->FileName);

Denne løsning er ikke køn, men den virker... :o)
  AnsiString temp = FLB1->FileName;
  AnsiString temp1;
  AnsiString temp2;
  int found = 0;
  temp = temp.Delete(temp.Length(),1);
  found = temp.Pos("[");
  temp1 = temp.SubString(0,found-1);
  temp2 = temp.SubString(found+1,temp.Length());
  FLB2->Directory = temp1 + temp2;

Du kan garanteret også bruge denne funktion senere:
void __fastcall TF1::FLB1DblClick(TObject *Sender)
{
  AnsiString temp = FLB1->FileName;
  AnsiString temp1;
  AnsiString temp2;
  temp = temp.Delete(temp.Length(),1);
  temp1 = temp.SubString(0,temp.Pos("[")-1);
  temp2 = temp.SubString(temp.Pos("[")+1,temp.Length());
  FLB1->Directory = temp1 + temp2;
}

Mange tak for hjælpen til jer begge to :)

Koden ser nu således ud og den virker perfekt :D

void __fastcall TForm1::FileListBox2Click(TObject *Sender)
{
  AnsiString temp = FileListBox2->FileName;
  AnsiString temp1;
  AnsiString temp2;
  temp = temp.Delete(temp.Length(),1);
  temp1 = temp.SubString(0,temp.Pos("[")-1);
  temp2 = temp.SubString(temp.Pos("[")+1,temp.Length());
  FileListBox2->Directory = temp1 + temp2;
  FileListBox1->Directory = FileListBox2->Directory;
  FileListBox1->Directory = ExtractFileName(FileListBox2->FileName);
}

Så nu mangler vi bare, at i lægger et svar :)

svar

Svar...
Et spørgsmål, hvad bruger du denne kode til:
FileListBox1->Directory = FileListBox2->Directory;
FileListBox1->Directory = ExtractFileName(FileListBox2->FileName);

Du skal lave følgende:
void __fastcall TForm1::FileListBox1Click(TObject *Sender)
{
  AnsiString temp = FileListBox1->FileName;
  AnsiString temp1;
  AnsiString temp2;
  temp = temp.Delete(temp.Length(),1);
  temp1 = temp.SubString(0,temp.Pos("[")-1);
  temp2 = temp.SubString(temp.Pos("[")+1,temp.Length());
  FileListBox2->Directory = temp1 + temp2;
}

Det første stykke kode, som du gav mig, bruger jeg til at hoppe frem og tilbage i arkivet i ListBox1 og den næste kode bruges nu til at få indholdet af den enkelte mappe vist i Listbox2
Mange tak for hjælpen til jer begge :)