andrypein.net : Kalau membuat explorer windows yang sungguhan beneran mah atuh saya juga gabisa, file explorer dengan delphi ini mah hanya versi noobnya.
Tujuan nya mah da sederhana atuh, hanya untuk memanfaatkan fasilitas komponen yang disediakan oleh IDE saja gan.
Liat saja skrinsutan aplikasinya :
Komponen-komponen tersebut bisa dicari dibagian pallete win31 (adalah pasti), yang dibutuhkan ada 3 : DriveComboBox, DirectoryListbox dan FileListBox.
Kodenya pun tidak W.o.W banget lah 
hanya event-event dari DriveComboBoxOnChange, DirectoryListboxOnChange dan FileListBoxOnClick.
procedure TForm1.DirectoryListBox1Change(Sender: TObject);
begin
filelistbox1.Directory:=directorylistbox1.Directory;
end;
procedure TForm1.DriveComboBox1Change(Sender: TObject);
begin
directorylistbox1.Drive:=drivecombobox1.Drive;
end;
procedure TForm1.FileListBox1Click(Sender: TObject);
var
i : integer;
begin
label1.Caption:=filelistbox1.FileName;
with filelistbox1 do
for i:=0 to items.Count-1 do
if selected[i] then
edit1.Text:=filelistbox1.Items.Strings[i];
end;
