本人以前用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类型,真是头痛!请专家指点,非常感谢!

解决方案 »

  1.   

    不是吧,在VB里面用OCX到了Delphi有VCL控件不好还用OCX?
    Delphi不比VB,有好多对OCX控件的操作都不大好,还是建议换一种控件吧,比如Indy的FTP控件,之类的.
      

  2.   

    你既然改用delphi了,那么你的编程习惯就应该改成VCL了,否则不是事倍功半吗
      

  3.   

    看一下 Senddata 发送是文本还是BUFFER
    如果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;