Delphi6Personalを使っているんですけど、clientsocketとserversocketを使ってファイルを送受信したいんですけど、ヘルプはないし、いろいろ検索してみたんですけど、やり方がいまいちわかりません。ここで検索してみて、SendStreamを使えばいいみたいなことはわかったんですけど、どう使っていいかわかりません。
送信側はFileStreamをOpenReadで開いてインスタンスをSendStream引数に渡して、
受信側はCreateで作ったFileStreamに、OnReadが発声したときにReceiveBufとReceiveLengthでポインタに渡して書き込んであげればおk
ツイート | ![]() |