delphi学习点滴(四)

最新推荐文章于 2019-11-08 11:07:11 发布

原创

最新推荐文章于 2019-11-08 11:07:11 发布 · 1k 阅读

CC 4.0 BY-SA版权

这篇博客分享了关于Delphi编程的一些实用技巧，包括SetValue方法的扩展使用、Image问题的解决方案、Panel拖动实现、Checkbox事件处理、快捷键设置、窗体图标设置、启动窗体最大化的方法以及如何应对Delphi6的错误处理。

系统默认生成的代码如下，但我们可以在这里增添更多的东西，比如针对Value判断执行一些相关操作，或者触发一些事件等。

procedure TForm1.SetTestPro(const Value: string);
begin
  FTestPro := Value;
end;

图片在窗体最大化时不能铺满界面，image放到panel，调整它们的Align属性就可以解决这个问题。

通过Panel加splitter可以实现Panel的拖动。

在执行Check的Checked属性赋值会执行Checkbox的OnClick事件，即Checkbox的OnClick事件具有OnChange类似的功能，所以可以在OnClick中写一些想要执行代码，例如：

procedure TForm1.chk1Click(Sender: TObject);
begin
  ShowMessage('Hi');
end;

procedure TForm1.btn1Click(Sender: TObject);