Pisze program do tworzenia stron WWW. Dokumenty otwierane sa na zakładkach. Mam jeden problem (wiedziałem to ale straciłem zrodla poprzedniego mojego edytora) mam następujący kod do zamknięcia wszystkich zakładek:
procedure TFMain.Zamknijwszsytkie1Click(Sender: TObject);
var
i: integer;
begin
PCZakladki.ActivePageIndex:= PCZakladki.PageCount-1;
try
with PCZakladki do
for i:= 0 to PageCount-1 do begin
PCZakladki.ActivePageIndex:= PCZakladki.ActivePageIndex-1;
Zamknij1Click(Sender);
end;
finally
end;
end;
Lecz to nie działa w czym tkwi problem?? (wyskakuje error jak zamykam wszystkie zakładki) prosze o pomoc!!!