Re: [twsocket] looking for a image or a video stream demo

2015-02-21 Thread Angus Robertson - Magenta Systems Ltd
> Title says it basically am in need of a demo showing how to use 
> Overbyte to stream a image over network

There are no such samples with ICS.  The concept of 'streaming' is inherent in
networking, but there are numerous ways of doing it with either TCP or UDP.

Angus

-- 
To unsubscribe or change your settings for TWSocket mailing list
please goto http://lists.elists.org/cgi-bin/mailman/listinfo/twsocket
Visit our website at http://www.overbyte.be


[twsocket] looking for a image or a video stream demo

2015-02-21 Thread Simon Lewis
Any chance of giving me some good links to any tcp test I only every found a 
indy one online but its that old the code no longer works.
-- 
To unsubscribe or change your settings for TWSocket mailing list
please goto http://lists.elists.org/cgi-bin/mailman/listinfo/twsocket
Visit our website at http://www.overbyte.be


[twsocket] Overbyte ICS FTP upload with progress bar

2015-02-21 Thread MMG Admin
I'm using the ICS Overbyte FTP for uploading a file. I want to display a
progressbar and a speed indicator in order to track and estimate large file
uploads. How can I do that? Also after the upload is completed i want to
delete the file from my hdd. Here is the code that i'm using right now to
upload to a ftp server.

procedure TForm1.Button1Click(Sender: TObject);
var ftp:Tftpclient;
begin
Ftp:=Tftpclient.Create(NIL);
Ftp.UserName:='';
Ftp.PassWord:='';
Ftp.HostName:='';
Ftp.LocalFileName:='d:\fpc-2.6.4.i386-win32.exe';
Ftp.HostDirName:='/';
Ftp.HostFileName := extractfilename(ftp.LocalFileName);

ftp.BandwidthLimit:=0;
Ftp.Passive := True;
FTP.Binary := True;
ftp.MultiThreaded:=true;

try
ftp.connect;

if ftp.Connected then
 begin

memo1.lines.add(datetimetostr(now)+' - connected to
'+ftp.hostname+' => '+ftp.LastResponse);

Ftp.put;
memo1.lines.add(datetimetostr(now)+' - loading file
"'+ftp.hostfilename+'" => '+ftp.LastMultiResponse);

Ftp.Quit;
memo1.Lines.Add(datetimetostr(now)+' - closing connection
=>'+ftp.lastResponse);
 end;

finally
ftp.free;

end;
end;

Thank you!
-- 
To unsubscribe or change your settings for TWSocket mailing list
please goto http://lists.elists.org/cgi-bin/mailman/listinfo/twsocket
Visit our website at http://www.overbyte.be