devxlogo

Adding lines to a TStrings Type Property

Adding lines to a TStrings Type Property

Question:
What am I doing wrong? I can insert the date and time to a Label component very easily (see first proc below), but not into a RichEdit component. I get three errors as if Delphi is looking for more. Why? And what is missing?

procedure TForm1.FormCreate(Sender: TObject);begin Label1.Caption := DateTimeToStr(Now);end;procedure TForm1.RichEdit1Enter(Sender: TObject);begin  RichEdit1.Lines.Add := (DateTimeToStr(Now));end;

Answer:
In your code, list the following:

procedure TForm1.RichEdit1Enter(Sender: TObject);begin  RichEdit1.Lines.Add := (DateTimeToStr(Now));end;
Here’s the problem. Add is a function and the string you want to add must bea parameter of that function. So instead of what wrote above, do thefollowing:
procedure TForm1.RichEdit1Enter(Sender: TObject);begin  RichEdit1.Lines.Add(DateTimeToStr(Now));end;
Although this is a pretty simple fix, you’d be amazed at how even seasoned veteransfall prey to this problem.

devxblackblue

About Our Editorial Process

At DevX, we’re dedicated to tech entrepreneurship. Our team closely follows industry shifts, new products, AI breakthroughs, technology trends, and funding announcements. Articles undergo thorough editing to ensure accuracy and clarity, reflecting DevX’s style and supporting entrepreneurs in the tech sphere.

See our full editorial policy.

About Our Journalist