Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi x Editfelder editieren (https://www.delphipraxis.net/36621-x-editfelder-editieren.html)

delphi_newbie_123 22. Dez 2004 18:08


x Editfelder editieren
 
hi
ich würde gerne 10 editfelder editieren und jeweil die
aktuelle Zahl in diese eintragen.
Habs folgendermaßen mal versucht doch das klappt irgendwie nicht :/
Delphi-Quellcode:
for i:=0 to 10 do
begin
edit(i).text:=inttostr(i);
end;

Luckie 22. Dez 2004 18:10

Re: x Editfelder editieren
 
Hier im Forum suchenFindComponent und alle Probleme sind gelöst.

delphi_newbie_123 22. Dez 2004 18:14

Re: x Editfelder editieren
 
danke schau ich mir gleich mal an

Neutral General 22. Dez 2004 18:30

Re: x Editfelder editieren
 
Das nächste mal bitte auch die Suche benutzen, dieses Problem hatten wir schon mehrmals (gelöst) :roll:

Es ginge theoretisch auch durch ein Array of TEdit, die Frage ist nur was effektiver ist...
Wenn du die Edit's während der Laufzeit erstellst würde ich es mit einem Array machen ansonsten könntest du auch die Edits die du in Delphi gesetzt hast in der Laufzeit in das Array laden :

Delphi-Quellcode:
var Edits : Array[1..10] of TEdit;
    i : Integer;
begin
Edits[1] := Edit1;
Edits[2] := Edit2;
...
for i := 1 to 10 do
Edits[i].Text := 'Alle Edits haben diesen Text';
end;
Welche Methode besser ist weis ich nicht, da ich es bis jetzt immer so gemacht hab :mrgreen:

delphi_newbie_123 22. Dez 2004 19:21

Re: x Editfelder editieren
 
sollte es so nicht klappen?
Delphi-Quellcode:
TPanel(FindComponent('Panel'+inttostr(i))).enabled:= false;

arbu man 22. Dez 2004 19:33

Re: x Editfelder editieren
 
Delphi-Quellcode:
 For i:=1 to 10 do begin
    (FindComponent('Edit'+IntToStr(i)) as TEdit).Text:='0';
  end;

delphi_newbie_123 22. Dez 2004 19:41

Re: x Editfelder editieren
 
jopp danke mist hatte vergessen dass ich die schleife bei 0 starte danke fuer die hilfe!!


Alle Zeitangaben in WEZ +1. Es ist jetzt 18:56 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz