AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Sprachen und Entwicklungsumgebungen Sonstige Fragen zu Delphi Delphi Schleife für aufsteigende Arraynamen

Schleife für aufsteigende Arraynamen

Ein Thema von xxsasch4xx · begonnen am 19. Feb 2011 · letzter Beitrag vom 19. Feb 2011
Antwort Antwort
xxsasch4xx

Registriert seit: 1. Mär 2010
210 Beiträge
 
#1

Schleife für aufsteigende Arraynamen

  Alt 19. Feb 2011, 17:28
ich würde gerne 20 arrays die unterschiedliche zahlen am ende haben werte von true zuweissen

die arrays sind global so deklariert:
Delphi-Quellcode:
name1 :array [1..20] of boolean;
name2 :array [1..20] of boolean;
...
bis
name20:array[1..20] of boolean;
 // kann man die deklaration von 20 arrays auf einmal auch optimieren?
1. Möglichkeit:

Delphi-Quellcode:
var i:integer;
begin
  for i :=1 to 20 do
  'name'+inttostr(i)[i]:=true;
2. Möglichkeit:
Delphi-Quellcode:
var i:integer;
begin
  for i :=1 to 20 do
  TArray(form1.FindComponent('name'+IntToStr(i)[i])):=True;
//so ging das immer bei image bildern aber hier wird es wohl nicht funktionieren oder?

er soll also sozusagen von array1[1] bis array20[20]
auf einen schlag alles true setzen

Geändert von xxsasch4xx (19. Feb 2011 um 17:36 Uhr)
  Mit Zitat antworten Zitat
Benutzerbild von patti
patti

Registriert seit: 20. Okt 2004
Ort: Mittelfranken
665 Beiträge
 
Turbo Delphi für Win32
 
#2

AW: Schleife für aufsteigende Arraynamen

  Alt 19. Feb 2011, 17:36
Warum nimmst du keine zwei-dimensionalen Arrays?

ar : array[1..20] of array[1..20] of boolean;
Patrick Kreutzer
[Informatik-Student im 4. Semester]
http://www.patti-k.de/
  Mit Zitat antworten Zitat
xxsasch4xx

Registriert seit: 1. Mär 2010
210 Beiträge
 
#3

AW: Schleife für aufsteigende Arraynamen

  Alt 19. Feb 2011, 17:37
also ich meine es so, dass man die zahl von dem namen am ende vom array auch mit verändert..

name1[1]
  Mit Zitat antworten Zitat
Benutzerbild von rollstuhlfahrer
rollstuhlfahrer

Registriert seit: 1. Aug 2007
Ort: Ludwigshafen am Rhein
1.529 Beiträge
 
Delphi 7 Professional
 
#4

AW: Schleife für aufsteigende Arraynamen

  Alt 19. Feb 2011, 17:37
so einfach geht das nicht. Du kannst keine Variable per Name aufrufen. Du kannst aber aus deinen 20 Variablen des gleichen Typs ein einziges Array machen (Name: array[1..20, 1..20] of Boolean) und dann kannst du dieses Array durchlaufen. Alternativ kannst du auch per FillChar(@Name, SizeOf(Name), #1) allen Teilen TRUE zuweisen.

Bernhard
Bernhard
Iliacos intra muros peccatur et extra!
  Mit Zitat antworten Zitat
Benutzerbild von patti
patti

Registriert seit: 20. Okt 2004
Ort: Mittelfranken
665 Beiträge
 
Turbo Delphi für Win32
 
#5

AW: Schleife für aufsteigende Arraynamen

  Alt 19. Feb 2011, 17:39
also ich meine es so, dass man die zahl von dem namen am ende vom array auch mit verändert..

name1[1]
Genau das lässt sich eben mit zwei-dimensionalen Arrays erledigen:

Delphi-Quellcode:
for x := 1 to 20 do
  for y := 1 to 20 do
    ar[x,y] := true;
Patrick Kreutzer
[Informatik-Student im 4. Semester]
http://www.patti-k.de/
  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:39 Uhr.
Powered by vBulletin® Copyright ©2000 - 2020, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2020 by Daniel R. Wolf