If then hvordan

Du mangler paranteser:
if TabbedNotebook1.OnClick and
(TabbedNotebook1.ActivePage='side2') then
Desuden, jeg tror ikke 'side2' duer her, men jeg har ikke lige Delphi her.
Tjek i hjælpen hvad type ActivePage er.

Det er vist ok med 'side2' det er en string i TTabbedNotebook.
Jeg tænkte på TPageControl.
Hvorfor bruger du ikke TPageControl, i stedet for den forældede TTabbedNotebook?

Hvad er det egentlig du gør? Det ser ud til du spørger på et event OnClick - det tror jeg ikke man kan.

Hvis det skulle være syntaktisk (omend stadigvæk noget vrøvl) korrekt, så skulle det se sådan ud (og husk lige at indrykke!):

if assigned(TabbedNotebook1.OnClick) and (TabbedNotebook1.ActivePage = TabSheet2) then
  Listbox1.Clear;

Dine Tabs' ligger på en TPageControl og den har en OnChange event som trigges når du skifter Tab. Her kan du spørge:

if (Sender as TPageControl).ActivePage = TabSheet2 then
  ListBox1.Clear;

Lad være med at spørge på en strengværdi; det dur ikke og det er i øvrigt meget grimt.