Zitat von
-=IOI=-:
Ich habe 2 PageControls, in denen jeweils eine Variable Anzahl an Tabs mit jeweils einem Memo vorhanden ist.
Ich denke mal, dass für diesen Zweck ein PageControl nicht das Richtige ist.
Wenn auf jedem TabSheet immer nur das Gleiche drauf ist (ein TMemo), dann kann man doch auch nur
ein Memo in Verbindung mit einer ListBox einsetzen.
(Listbox links; Memo rechts daneben)
Der Benutzer klickt auf einen Eintrag in der Listbox und das Programm ändert daraufhin den Inhalt des Memo.
Natürlich müssen dann alle Texte irgendwo getrennt gespeichert werden. (z.B. in TListbox.Objects[])
Zu deiner Frage: du musst das Memo im Controls[]-Array suchen
Delphi-Quellcode:
function FindMemo(parent:Tcontrol):TMemo;
var i : integer;
begin
for i := 0 to parent.ControlCount-1 do
begin
if parent.Controls[i] is TMemo then
begin
result := TMemo(parent.Controls[i]);
Exit;
end;
end;
result := nil; // nix gefunden
end;