Problem z zapisem zakładek kontrolki PageControl

Witam wszystki.
Mam taki problem przy zapisywaniu moich zakładek, otóż mam:

Zapisz jako:

If SaveDialog1.Execute Then
begin
  PageControl1.ActivePage.Caption := ''+ExtractFileName(SaveDialog1.FileName);
  (PageControl1.ActivePage.Controls[0] as TSynMemo).Lines.SaveToFile(SaveDialog1.FileName);
  (PageControl1.ActivePage.Controls[0] as TSynMemo).Modified := False;
end;

No i zapisz:

(PageControl1.ActivePage.Controls[0] as TSynMemo).Lines.SaveToFile(SaveDialog1.FileName);
(PageControl1.ActivePage.Controls[0] as TSynMemo).Modified := False;

No i problem jest przy zapisie, gdyż nie zapisuje mi do pliku z aktywnej zakładki, tylko do pliku ostatnio zapisanego. Wiecie może jak wybrnąć z tego problemu.?

sorki, temat do kosza, sam sobie poradziłem. :)

nukleciusz napisał(a):

sorki, temat do kosza, sam sobie poradziłem. :)

to jak sobie radzisz z czymś to wklejaj rozwiązanie, przyda się innym w przyszłości (a przy okazji jest szansa, że ktoś ci lekko poprawi kod i nauczysz się czegoś)