AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Sprachen und Entwicklungsumgebungen Sonstige Fragen zu Delphi Delphi Panel Indizes mit For-Schleife durchgehen

Panel Indizes mit For-Schleife durchgehen

Ein Thema von Basti_sz · begonnen am 1. Mär 2009 · letzter Beitrag vom 1. Mär 2009
Antwort Antwort
Basti_sz

Registriert seit: 25. Jan 2009
7 Beiträge
 
#1

Panel Indizes mit For-Schleife durchgehen

  Alt 1. Mär 2009, 16:18
Hallo,

ich habe gerade in meinem neuen Projekt 10x10 Panels erstellt (also 100 )
Jetzt will ich deren Text durchnummerieren (z.B. 1 bis 100).
Dabei will ich natürlich nicht alle einzeln ändern sondern wollte mir mit einer For-Schleife helfen.
Meine Panels heißen Panel1, Panel2, Panel3 ... Panel100.

Meine Idee:

For i:=1 To 100 Do Panel(i).Text:=i;

Leider funktioniert Panel(i) nicht und mir fällt keine andere Möglichkeit ein.
Es wäre super, wenn jemand eine Lösung für das Problem hätte.

Danke schon einmal im Voraus

Grüße Basti
  Mit Zitat antworten Zitat
Benutzerbild von Meflin
Meflin

Registriert seit: 21. Aug 2003
4.856 Beiträge
 
#2

Re: Panel Indizes mit For-Schleife durchgehen

  Alt 1. Mär 2009, 16:20
-> Hier im Forum suchenFindComponent
  Mit Zitat antworten Zitat
mkinzler
(Moderator)

Registriert seit: 9. Dez 2005
Ort: Heilbronn
39.804 Beiträge
 
Delphi 10.4 Sydney
 
#3

Re: Panel Indizes mit For-Schleife durchgehen

  Alt 1. Mär 2009, 16:21
For i:=1 To 100 Do (FindComponent('Panel'+IntToStr(i)) as Tpanel).Text:=i;
Markus Kinzler
  Mit Zitat antworten Zitat
Benutzerbild von DeddyH
DeddyH

Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.310 Beiträge
 
Delphi 11 Alexandria
 
#4

Re: Panel Indizes mit For-Schleife durchgehen

  Alt 1. Mär 2009, 16:28
FindComponent in Schleifen ist aber nicht so prickelnd, da es intern selbst eine Schleife verwendet. Besser wäre es, sich ein Array of TPanel oder eine TObjectList(OwnsObjects dabei auf false) zu erstellen und die Panels darin zu verwalten.
Detlef
"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen
  Mit Zitat antworten Zitat
Basti_sz

Registriert seit: 25. Jan 2009
7 Beiträge
 
#5

Re: Panel Indizes mit For-Schleife durchgehen

  Alt 1. Mär 2009, 16:37
For i:=1 To 100 Do (FindComponent('Panel'+IntToStr(i)) as Tpanel).Caption:=IntTOStr(i);

Vielen Dank es hat geklappt. Es waren nur noch zwei weitere Fehler:

Panel.Text gibt es nicht es muss Panel.Caption heißen
Caption ist ja ein String also muss man am Ende IntToStr(i) nehmen.
  Mit Zitat antworten Zitat
Themen-Optionen Thema durchsuchen
Thema durchsuchen:

Erweiterte Suche
Ansicht

Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 00:22 Uhr.
Powered by vBulletin® Copyright ©2000 - 2022, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2021 by Daniel R. Wolf