загрузить список файлов в ListBox из папки:
Код:
SendMessage(ListBox1.Handle, LB_DIR, $3f, Integer(PChar('c:\Windows\System32\*.dll')));
зашифровать\расшифровать данные:
Код:
CryptAcquireContext()
CryptCreateHash()
CryptHashData()
CryptEncryptCrypt()/CryptDecrypt()
CryptDestroyKey()
CryptDestroyHash()
CryptReleaseContext()