Hallo
Das aktuelle SynEdit kannst du so ermitteln.
(Vorausgesetzt, auf einem Tab befindet sich nur ein TSynEdit und kein anderes Control)
Delphi-Quellcode:
function TForm1.GetCurrentSynEdit: TSynEdit;
var
i: SmallInt;
begin
Result := nil;
for i := 0 to PageControl1.ActivePage.ControlCount -1 do
begin
if (PageControl1.ActivePage.Controls[i] is TSynEdit) then
begin
Result := TSynEdit(PageControl1.ActivePage.Controls[i]);
Break;
end;
end;
// Assert(Result <> nil);
end;