CreateWindowEx(0, 'EDIT', 'INPUT',               {标题}                        WS_VISIBLE or WS_CHILD or WS_BORDER,   {带边框子窗口}
                        40,120,240,24,                        wnd,                        IDC_EDT1,                        HInstance,                        nil                        );这样可以在窗体创建一个edit 但怎样设置字体大小呢?设置为密码类型呢?

解决方案 »

  1.   

    设置EDIT1控件的相关参数即可
      

  2.   

    设置PasswordChar属性等于'*',即
    EDIT.PasswordChar='*'
      

  3.   

    var
      DefaultFont   : HFont;  DefaultFont := CreateFont(-$C, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, '宋体');  SendMessage(EditHandle,WM_SETFONT,DefaultFont,0);FormDestroy
      DeleteObject(DefaultFont);
      

  4.   

    纯api实现啊,一般不需要这么做吧
      

  5.   


    字体如上所述修改密码可以把第二个参数 WS_VISIBLE or WS_CHILD or WS_BORDER or ES_PASSWORD, {带边框子窗口}