Witam,
mam problem z usuwaniem pustych linii z TMemo. Wiem jak to robić, ale działa to strasznie wolno, może coś poradzicie?
Mam powiedzmy 2000 linii w Memo, z czego co druga jest pusta - więc powinno zostać mi 1000 wierszy.
Mój kod:
DataMemo.Lines.BeginUpdate;
for I := DataMemo.Lines.Count - 1 downto 0 do
if DataMemo.Lines[I] = '' then
DataMemo.Lines.Delete(I);
DataMemo.Lines.EndUpdate;
Proszę o wskazówki :)