(AGK version: 108.16)
Submitted: 2013-08-03 10:40:42
Setvirtualresolution(640,480)
ResetTimer()
//Show Sub-Folders present in Current Folder
count=0
MakeFolder("AGK Test Folder#1")
MakeFolder("AGK Test Folder#2")

Print("List of Sub-Folders")
Render()
fn$=GetFirstFolder()
while fn$<>""
    Print(Spaces(2)+fn$)
    Inc count
    fn$=GetNextFolder()
endwhile
Sync()
Repeat
Until Timer()>20
DeleteFolder("AGK Test Folder#1")
DeleteFolder("AGK Test Folder#2")
End
Help make AGK better by submitting an example for this command!
(All examples are subject to approval)
Login to post an example of your own.