delphi 传输多个文件 - Delphi / 网络通信/分布式开发
写得程序已经可以传输一个文件。
我现在的问题是，我想传输多个文件怎么办？
不知道你怎么设计的
unit Frm_Client;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, FileCtrl,ScktComp, StdCtrls, XPMan;
const
Buffersize=1048576; //41943040; //40MB
CPort = 6656;
type
TForm1 = class(TForm)
SClient: TClientSocket;
BtnConn: TButton;
BtnSelFile: TButton;
GBxStatus: TGroupBox;
MmStatus: TMemo;
EDIPAddr: TEdit;
Label1: TLabel;
OpenDialog1: TOpenDialog;
Label2: TLabel;
EResourceFiles: TEdit;
Label3: TLabel;
ListBox1: TListBox;
BtnsSplit: TButton;
BtnAdd: TButton;
BtnBrowse: TButton;
EDestination: TEdit;
Label6: TLabel;
SaveDialog1: TSaveDialog;
procedure FormClose(Sender: TObject; var Action: TCloseAction);
procedure FormCreate(Sender: TObject);
procedure FormDestroy(Sender: TObject);
procedure SClientConnect(Sender: TObject; Socket: TCustomWinSocket);
procedure SClientDisconnect(Sender: TObject; Socket: TCustomWinSocket);
procedure SClientRead(Sende
相关问答：
select * from shuju.DB where 开盘价-收盘价<=0.02
开盘价 与收盘价 是数据库里的字段
select * from aTableName where ((开盘价-收盘价) <=0.02 )
开盘价比收盘价低两分以下的情况
Mark!!!!!!
se ......
var
FXmlDoc:IXMLDomDocument;
begin
使用FXmlDoc.save('文件路径')；
结果发现保存后的该文件中文全部为乱码，如何解决
end；
参考这个
http://blog.csdn.net/jiangnanandi/archive/2008/11/28/3399804.aspx ......
定义变量s,sql为string类型，s为函数参数，sql：='select field1 from table1 where'+s;运行时s赋值为id>7或者id<7、id=7,但是运行时总是出错，请各位帮我改错，多谢！
showMessage(sql)下看看
sql：='sel ......
你们遇到这个问题吗？使用delphi 的时候，来了一封信。说要我教版权费。我昏倒。怎么办？
不能怎么办,一是理他们 2是不理他们
你放话叫他们来公司查。。。看他们有胆没？
不理他们就是，当时也问我们公司要的 ......
以前中间站是电脑通过串口控制的，现在改成了USB接口，请问要怎么做啊？求高手指点一下
是usb转串口吗？那应该还是可以按串口操作的，只是速度不能太高
如果不是usb转串口，请查阅usb驱动的sdk说明。
这个是� ......
