das OR hat eine stärkere Bindung als das =
du musst also nur die Klammern anders setzen:
if (zahl mod 3 = 0) OR (zahl mod 7 = 0) then
Hier ist die Rangfolge der Operatoren erklärt:
wikibooks
PS: Bitte benutze die Delphi-Tags, wenn du Quellcode postest.