Hallo Homer,
(1) ich kenne nur Delphi bis Version 7. Bei mir müsste die Suchroutine im Else-Zweig der Iterationsschleife so aussehen:
Result := Finde(c_ctrl, c_name_s);
Nur so erhältst du ein Ergebnis, wenn das gesuchte Control einen Abstand größer 1 (im Control-Baum) hat.
(2) Den Testaufruf würde ich so erwarten:
Delphi-Quellcode:
Procedure Test();
var
i : Integer;
begin
for i := 1 to 2 do
Finde(g_hf, 'B_Text' + i.ToString).Text := '';
end;
Aber wie schon erwähnt bin ich mit den Neuerungen von Delphi nicht genügend vertraut. Vielleicht machst du alles richtig und ich sehe nur weiße Mäuse.
marabu
@Spider: danke dir, habe zu lange getippt...