小编dav*_*vea的帖子

寻找TextFile

我正在使用非常大的文本文件,2GB甚至更多.我想有一个类似Seek()的函数.有没有人这样做过?加载到TStringList是不可能的.也使用无类型文件.现在我正在使用readLn,但这持续时间过长.谢谢.

delphi text-files

6
推荐指数
1
解决办法
4216
查看次数

带底部对齐面板的TStatusBar

我有一个带有a TStatusBar,底部对齐TPanel,底部对齐TSplitter且客户端对齐的表单TPanel,如下面的屏幕截图所示:

屏幕截图1  - 之前 - 好

(分离器颜色为红色,使其更明显)

Button1只是将Panel1的高度增加20:

Panel1.Height := Panel1.Height + 20;
Run Code Online (Sandbox Code Playgroud)

但是当点击控件的顺序改变时,Panel1正在打开状态栏,分割器现在正在调整状态栏的大小.

屏幕截图2  - 后 - 坏

仅当Panel1的高度增加超过StatusBar1(19)的高度时才会发生这种情况.

我认为这是由于有两个底部对齐的控件引起的,但我不知道问题的确切原因以及如何解决它.

我目前正在使用XE2,但我对D2010也有同样的问题.

在这种情况下有没有办法将Panel1的高度设置为任意值,同时确保控件保持其预期位置?

delphi alignment statusbar

5
推荐指数
1
解决办法
1154
查看次数

标签 统计

delphi ×2

alignment ×1

statusbar ×1

text-files ×1