本人以前用VB的Winsock控件编程实现客户端ftp,现在改用delphi编程,由于习惯了用MsWinsock.ocx控件编程,于是就想在delphi中也使用MsWinsock.ocx控件,实现ftp,问题是这样的:下面是在VB中的部分代码:
dim strCmd as string
strCmd = "user"
user_name = Trim(username.Text)
sckControl.SendData strCmd + " " + user_name + vbCrLf请问在delphi中,这几句代码应该怎样写?
在delphi中要求Senddata后跟的变量是oleVariant类型,不知该怎样把命令字符串转化为oleVariant类型,真是头痛!请专家指点,非常感谢!
dim strCmd as string
strCmd = "user"
user_name = Trim(username.Text)
sckControl.SendData strCmd + " " + user_name + vbCrLf请问在delphi中,这几句代码应该怎样写?
在delphi中要求Senddata后跟的变量是oleVariant类型,不知该怎样把命令字符串转化为oleVariant类型,真是头痛!请专家指点,非常感谢!
Delphi不比VB,有好多对OCX控件的操作都不大好,还是建议换一种控件吧,比如Indy的FTP控件,之类的.
如果BUFFER的话,将下面的字符串设置成 ARRAY OF BYTE填充就这些字符就可以。(用SOCKET比较多,不过通讯都差不多)var
strCmd:string;
beginstrCmd:= 'user'
user_name := Trim(username.Text);
sckControl.SendData(strCmd + ' ' + user_name + chr(13)+chr(10));end;