Filhantering i Delphi?

Programmering

0 svar · 168 visningar · startad av Dr-man

Medlem sedan juli 2002732 inlägg
Trådstart#1
if ($handle = opendir('.')){ 
      while (false !== ($file = readdir($handle))){ 
        if ($file != "." && $file != "..") { 
          $dfile = $file;
          $sfile = $file;
          $upload2 = ftp_put($site, $dfile, $sfile, FTP_BINARY); 
        }
      }
      closedir($handle); 
}

Finns nån motsvarande lösning för detta i Delphi?

265 ms totalt · 4 externa anrop · v20260731065814-full.d34c6d5a
127 ms — deklarationer (db)
0 ms — hämta statistik (cache)
134 ms — hämta tråd, inlägg och bilagor (db)
126 ms — ändringar (db)