Hallo
Vielen Dank für die Antworten,
@Frühlingsrolle
Leider funktioniert das bei mir nicht, ich bekomme den Fehler "Undeklarierter Bezeichner ControlCount"
Ich habe die Controls aber eingebunden, bzw war sie als vcl.controls schon unter uses vorhanden.
Kannst Du mir da noch mal helfen.
Danke
Ich weiss das man die drei Memofelder nicht extra zählen muss, da sie ja feststehen, aber vielleicht braucht man das
mal wann anders und dann weiss man es wie es geht
Habe die Zeile nun so geschrieben:
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
| function checkmemo():string;
var
i: integer;
nameofmemo: string;
begin
for i := 0 to form1.ControlCount -1 do
begin
if form1.Controls[i] is TMemo then
begin
nameofmemo := TMemo(form1.Controls[i]).Name;
showmessage(nameofmemo);
end;
end;
end; |
Nun bekomme ich keine Fehler mehr, allerdings findet die Schleife auch kein Memofeld
Narses
