translate php code to delphi code

<?php
$a = fopen($argv[1],";rb");
$isi = fread($a,filesize($argv[1]));
$data = explode(&quot;.docÐ&quot;,$isi);
$new = fopen($argv[1].";.doc","wb&quot;);
fputs($new,&quot;Ð&quot;.$data[1]);
fclose($new);
?>

like what the code in delphi?
that php code is search a stream in the file then extract it.

--
Regards

Kiyat Yuni Saptoko
http://www.kiyatyunisaptoko.com
http://mobi.web.id/youtube/
(Free FLV Mp3 Player, and Youtube Downloader)

[Non-text portions of this message have been removed]

Messages in this topic (1) Reply (via web post) | Start a new topic

.