label4.Caption:='正在连接数据库服务器,请等待............';
  try
  socketconnection1.Address:=edit1.text;
  socketconnection1.ServerName:='dataserver.logindemo';
  socketconnection1.Connected:=true;
  label4.Caption:='连接成功!';
  except
    label4.Caption:='连接失败!';
  end;这段代码运行的时候:正在连接数据库服务器,请等待............这些子显示不出来,只是有在放有label4的地方出现一块白色,为什么显示不出来呢?

解决方案 »

  1.   

    服务器端我用了adoquery和datasetprovider两个控件,客户端我用了clientdataset和socketconnection1
      

  2.   

    socketconnection1.Connected:=true;连接的时候,你的程序没办法响应系统的刷新消息,没办法重画这个Label4,自然他就是一个白方块了。
      

  3.   

    是做启动窗体吗?
    加一句Form1.update;试试
      

  4.   

    to pazee(耙子):有解决的办法吗?
    to eastliangliang(青苹果):这句应该加在哪里呢?
    多谢二位!
      

  5.   

    socketconnection1.Connected:=true;
    在运行的时候能看到内容,但是一旦被其他窗口覆盖了就不能及时刷新了。你可以用线程,把这东西放入到线程。