delphi TStrings 过滤空行

本文整理自网络，侵删。

 
procedure FilteredBlankLines(Strings: TStrings);
var
  i: Integer;
begin
for I := Strings.count - 1 downto 0 do
begin
  if Trim(Strings[I]) = '' then
    Strings.Delete(I);
end;
end;
 

相关阅读 >>

Delphi释放内存一般这么写

Delphi winapi: inflaterect - 改变矩形大小

精通Delphi模拟按键

Delphi执行查询语句时的进度条怎么做

Delphi idhttp多线程下载

Delphi rs232c串行通讯接口的应用

Delphi 更改消息对话框中的按钮标题

Delphi最全面的dbgrid点击标题实现排序

Delphi formatdatetime 显示日期时间

Delphi 遍历系统窗口标题可用于反外挂反破解

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » delphi TStrings 过滤空行