StrToInt Erorror vermeiden !

[Delphiturbo]

Der code ist in ein Button und nicht zusamen in OnCeate
darum kennt Delphi Zahl1 nicht, wenn ich den Teil hier einbaue:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
if Not FileExists('MyIniFile.ini')  then
S4:='0';
if StrToInt(s2) - strToInt(S1) > 10 then

ich kann nicht den Tel oben dazu einfügen
if not TryStrToInt( zahl1, S1) then S1 := 0;