Want to protect your cyber security and still get fast solutions? Ask a secure question today.Go Premium

x
?
Solved

StringList Objects

Posted on 1998-10-16
4
Medium Priority
?
739 Views
Last Modified: 2013-11-23
I am interested in using the Objects property of a StringList to associate objects with certain Lines of a RichEdit. However, Delphi's help says that certain StringList objects ignore the Object property because "they don't make sense, like Lines in a Memo". I'm not sure exactly what that means but is there a way to associate Objects with Lines in a memo (or richedit) object?
0
Comment
Question by:jcglen
  • 2
4 Comments
 

Author Comment

by:jcglen
ID: 1343156
Edited text of question
0
 
LVL 12

Accepted Solution

by:
rwilson032697 earned 100 total points
ID: 1343157
What the help is saying is that the designers of the TMemo (and probably TRichEdit) objects couldn't think of a reason to do it and so didn't.

The easiest way is to have a TList that stores the objects. You could match the index of a line of text in the lines property to the index of an object in the TList object.

You will need to manage what happens when the user deletes/adds lines etc whch may be a little awkward, but if it is to be read-only this should be fine...

Cheers,

Raymond.
 
0
 
LVL 1

Expert Comment

by:Edo082297
ID: 1343158
Hello jcglen
   Associating line indexes with TList pointers is not a good idea in my opinion. I use the Objects member (or related Data member in TListItems) a lot because they are very useful. There are two ways to do what you are trying to do. First of all, since the Lines property of a TRichEdit is itself of type TStrings, you could associate your object with Lines.Objects. The second more complicated thing keeps your objects associated with your string list (which is what you want to do, right?).

First, declare a small class, called TLine:

  TLine = class
  private
    FLine : String;
  end;

Now, to associate a given line with your object, create an object of type TLine and associate it with your string list member.

  MyLine := TLine.Create;
  MyLine.FLine := RichEdit1.Lines[y];
  MyStringList.Objects[x] := MyLine;

Now you have kept the text in your string list and have an associated object. You can dereference the string like this:
 
  TLine(MyStringList.Objects[AnIndex]).FLine;

You can also search your stringlist using IndexOf, IndexOfObject, and so on (just like you can with Lines). The Objects and Data members of various classes in Delphi are very powerful in this regard.

Finally, in your destructor, you have to free the memory you have allocated for each of these objects. Do the following:

  for i := 0 to Pred(MyStringList.Count) do
    TLine(MyStringList.Objects[x]).Free;

Regards,
Edo

0
 
LVL 1

Expert Comment

by:Edo082297
ID: 1343159
I am tired, there is a mistake in the destructor, [x] should read [i].

0

Featured Post

Upgrade your Question Security!

Your question, your audience. Choose who sees your identity—and your question—with question security.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

A lot of questions regard threads in Delphi.   One of the more specific questions is how to show progress of the thread.   Updating a progressbar from inside a thread is a mistake. A solution to this would be to send a synchronized message to the…
Introduction The parallel port is a very commonly known port, it was widely used to connect a printer to the PC, if you look at the back of your computer, for those who don't have newer computers, there will be a port with 25 pins and a small print…
Look below the covers at a subform control , and the form that is inside it. Explore properties and see how easy it is to aggregate, get statistics, and synchronize results for your data. A Microsoft Access subform is used to show relevant calcul…
As many of you are aware about Scanpst.exe utility which is owned by Microsoft itself to repair inaccessible or damaged PST files, but the question is do you really think Scanpst.exe is capable to repair all sorts of PST related corruption issues?
Suggested Courses
Course of the Month15 days, 6 hours left to enroll

578 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question