Solved

Delphi fill TEdit boxes in cycle instead of edit1.text:=''; edit2.text:='' etc.

Posted on 2003-11-03
2
508 Views
Last Modified: 2010-04-05
Hello. Could somebody help me with this ?

For example:  I have 100 TEdit boxes.(edit1,edit2,edit3...)  I want to fill all boxes with string 'abc'.  Is it possible to do it in a cycle ?

Thx.
0
Comment
Question by:morseus2
2 Comments
 

Accepted Solution

by:
wwwbetyar earned 125 total points
ID: 9674773
yes

For a:=1 to 100 do
  TEdit(form1.findcomponent('Edit'+inttostr(a))).Text:='abc';
0
 

Author Comment

by:morseus2
ID: 9674785
It works fine. Thx
0

Featured Post

How to run any project with ease

Manage projects of all sizes how you want. Great for personal to-do lists, project milestones, team priorities and launch plans.
- Combine task lists, docs, spreadsheets, and chat in one
- View and edit from mobile/offline
- Cut down on emails

Join & Write a Comment

The uses clause is one of those things that just tends to grow and grow. Most of the time this is in the main form, as it's from this form that all others are called. If you have a big application (including many forms), the uses clause in the in…
Introduction I have seen many questions in this Delphi topic area where queries in threads are needed or suggested. I know bumped into a similar need. This article will address some of the concepts when dealing with a multithreaded delphi database…
When you create an app prototype with Adobe XD, you can insert system screens -- sharing or Control Center, for example -- with just a few clicks. This video shows you how. You can take the full course on Experts Exchange at http://bit.ly/XDcourse.
You have products, that come in variants and want to set different prices for them? Watch this micro tutorial that describes how to configure prices for Magento super attributes. Assigning simple products to configurable: We assigned simple products…

747 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

Need Help in Real-Time?

Connect with top rated Experts

14 Experts available now in Live!

Get 1:1 Help Now