13/02/18 08:06:43.24 .net
>>113
sl: TStringList;
i: Integer;
// Create して LoadFromFile
for i := sl.Count - 1 DownTo 0 do
if sl[i] = '' then sl.Delete(i);
// SaveToFile して Free しておしまい。
たぶんこんな感じ。
13/02/18 08:06:43.24 .net
>>113
sl: TStringList;
i: Integer;
// Create して LoadFromFile
for i := sl.Count - 1 DownTo 0 do
if sl[i] = '' then sl.Delete(i);
// SaveToFile して Free しておしまい。
たぶんこんな感じ。