我学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'等错误