Re: Remove Spaces Function

Article View: borland.public.delphi.language.objectpascal

Article #207

Back to borland.public.delphi.language.objectpascal Previous Next

#207

From: Gerrit Beuze
Date: Mon, 26 Jan 2004 16:46

31 lines
1673 bytes

Hello,

One way to speed it up is to use an in-memory stringlist
and perform the operations on that rather than on a control.
After you're done, assign the filtered stringlist to the control.

Buf := TStringList.Create;
try
  Buf.Assign(MainText.Lines);

[.. work with Buf ...]


  MainText.Lines.Assign(Buf);
finally
  Buf.Free;
end;

Gerrit Beuze
ModelMaker Tools

> hello,
> I wrote this procedure which remove the spaces after and before the "equal"
[snip]
> this procedure is extremely slow when loading text from a file cause it's
> called on every line,

> Yehia
>
>
>

Technical Details

Message-ID: <4015446e$1@newsgroups.borland.com>

Path:

arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!sn-xit-01!sn-xit-09!supernews.com!216.170.153.135.MISMATCH!tdsnet-transit!newspeer.tds.net!diablo.voicenet.com!yellow.newsread.com!netaxs.com!newsread.com!newsfeed00.sul.t-online.de!newsfeed01.sul.t-online.de!t-online.de!newsgroups.borland.com!not-for-mail

References: <40153f7d@newsgroups.borland.com>

Show Full Headers

Complete Article Headers

X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 109d30,8b4ceee2931b0643
X-Google-Attributes: gid109d30,public
X-Google-ArrivalTime: 2004-01-26 09:11:53 PST
From: "Gerrit Beuze" <gerrit@no.spam.for.modelmaker.demon.nl>
Newsgroups: borland.public.delphi.language.objectpascal
References: <40153f7d@newsgroups.borland.com>
Subject: Re: Remove Spaces Function
Date: Mon, 26 Jan 2004 17:46:34 +0100
Lines: 33
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 6.00.2800.1158
X-MIMEOLE: Produced By Microsoft MimeOLE V6.00.2800.1165
NNTP-Posting-Host: 212.238.242.122
Message-ID: <4015446e$1@newsgroups.borland.com>
X-Trace: newsgroups.borland.com 1075135598 212.238.242.122 (26 Jan 2004 08:46:38 -0700)
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!sn-xit-01!sn-xit-09!supernews.com!216.170.153.135.MISMATCH!tdsnet-transit!newspeer.tds.net!diablo.voicenet.com!yellow.newsread.com!netaxs.com!newsread.com!newsfeed00.sul.t-online.de!newsfeed01.sul.t-online.de!t-online.de!newsgroups.borland.com!not-for-mail

Reply to Parent Message