• 我学Delphi心得及笔记常用问题与解决方法


    1、弹出窗体

    要想在一个窗体中弹出另一个窗体,方法如下:

    uses 窗体单元名;
    formName.show;

    formName.showmodel 返回一个窗体状态句柄。关闭窗体:close;

    2、关于禁用最大最小化窗体方法

    设置窗体的boderstyle为:bsTooWind

    3、Delphi 7 读写文件方法

    var

      fp:TextFile;
      fileName:string;
    //获得项目根目录
    fileName:=ExtractFileDir(Application.ExeName)+'\FrmSetColumn.ini';//当前项目目录下的文件
     try
        assignfile(fp,fileName);
        rewrite(fp);
        writeln(fp,'要写的内容');//写入文件内容
        CloseFile(fp);
        except on e:Exception do
          showmessage(e.Message);
        end;

    //读文件方法

    if FileExitiss(fileName) then

    begin
      AssignFile(fp,fileName);
         Reset(fp);
         Readln(fp,str);
         CloseFile(fp);

    end

    else

    begin

      showmessage('文件不存在');

    end

    在一个窗体中可以操作另一个窗体中的控件,通过引用窗体所在的单元,以单元名.窗体的控件;

    4、让delphi第三方控件businessSkin中的bsSkinrichedit的滚动条显示出来

    要再添加一个bsSkinScrollBar,设置其kind属性为sbVertical,在bsSkinRichEdit的VScrollBalr属性里选上bsSkinScrollBar控件就可以了,大小和位置自己调整下应该就能满足你的要求了

    5、安装Indy 9

    卸载delphi7的原来版本,在component -> Install packages...在packages列表中找到internet Direct (Indy) for D7..将钩去掉,点击ok.
    File->open...打开Delphi_Indy_9.0.18/dclIndy70.dpk  编译安装即可.

    6、让窗体始终保持最前面方法:

    设置窗体的FormStyle属性设成:fsStayOnTop;

    7、windows系统操作

    关机:ExitWindowsEx(EWX_POWEROFF OR EWD SHUTDOWN,0)

    注销:ExitWindowsEx(EWX_LOGOFF,0)

    重启:ExitWindowsEx(EWX_REBOOT,0)(必须有操作的权限)

    8、setFocus 的使用

    setFocus 使用前该控件或窗体必须是在完全呈现后,且不能为隐藏或未创建,调用 些方法应该判断其是否为nil否则会出现 'CanNot Focus a disabled or invisbled window'等错误

  • 相关阅读:
    前端工程师基础课程作业
    对于API接口设计的几点看法
    socket socket.io
    移动端布局
    angularJS
    bootstrop的应用
    jquery基础
    html5本地存储
    ajax
    数据库类型
  • 原文地址:https://www.cnblogs.com/youshan/p/2111649.html
Copyright © 2020-2023  润新知