老鱼,我运行这个程序,单击“Button“按钮,弹出一个超宽窗口。窗口中间有个”OK“按钮,窗口的标题是项目名称,左上角是繁体字。

解决方案 »

  1.   

    老鱼,我运行这个程序,单击“Button“按钮,弹出一个超宽窗口。窗口中间有个”OK“按钮,窗口的标题是项目名称,左上角是繁体字。
      

  2.   

    你的这种写法是将EDIT1的地址存入了P
    而不是EDIT1.TEXT的值。
      

  3.   

    指针p指向了Edit1,应看到Edit1地址中的数据,会有什么意思呢?
      

  4.   

    抱歉,各位,是这个代码:
    procedure TForm1.Button1Click(Sender: TObject);
    var
        p:^String;
    begin
        p:=@Edit1;
        ShowMessage(p^);
    end;
    烤错了,抱歉,抱歉。
      

  5.   

    回复人: wolfAone(¤一步一步网上爬¤) (  ) 信誉:100  2002-04-24 15:56:00  得分:0  
     
     
      老鱼,我运行这个程序,单击“Button“按钮,弹出一个超宽窗口。窗口中间有个”OK“按钮,窗口的标题是项目名称,左上角是繁体字。 
     
     
      

  6.   

    回复人: wolfAone(¤一步一步网上爬¤) (  ) 信誉:100  2002-04-24 15:56:00  得分:0  
     
     
      老鱼,我运行这个程序,单击“Button“按钮,弹出一个超宽窗口。窗口中间有个”OK“按钮,窗口的标题是项目名称,左上角是繁体字。 
     
     
      

  7.   

    回复人: nne998(上上下下左右左右BABA) (  ) 信誉:94  2002-04-24 15:58:00  得分:0  
     
     
      无聊,乱搞,,,,,,,
     
     
      

  8.   

    你试试这个,呵呵:
    procedure TForm1.Button1Click(Sender: TObject);
    var
        p:^String;
    begin
        p:=$29632854;
        ShowMessage(p^);
    end;
      

  9.   

    nne998(上上下下左右左右BABA) :你好,你可以不发贴,每人当你是哑巴,你D是吧,有本事你D去丫!你丫,D!
      

  10.   

    你实际上是将Edit控件在内存中的信息,包含RTTI,复制到对话框中来显示,
    这部分信息实际上是二进制的,所有可能出现你所说的乱码,因为内容很多,所有
    窗口在计算尺寸时会很宽
      

  11.   

    Delphi对指针的检查很不严格,但你把Edit的地址给一个字符指针是没有意义的。