Clomosy ile değişken kullanımı

var anaDegisken: Integer;

{ try // Ana program içinde bir yerel değişken anaDegisken = 5;
ShowMessage('Sonuç: '+ IntToStr(sayilariCarp(anaDegisken, 3)));
except
ShowMessage('Exception Class: '+LastExceptionClassName+' Exception Message: '+LastExceptionMessage); }
}

Doğrusu bu şekilde mi açılmamış olan parantezi mi kapatmamız gerekiyor bunun haricinde kodumu çalıştıramadım.

gerçek kodum ise bu şekildedir

void InsertToDB{

try

Clomosy.DBSQLServerQuery.Sql.Text = 'Insert into Roles (role_name) values ('+editRoleName.Text+')';

Clomosy.DBSQLServerQuery.ExecSql;

ShowMessage('Veri ekleme başarılı');

except

ShowMessage('Exeption Class: '+ LastExceptionClassName+ ' Exception Message: '+ LastExceptionMessage);

}

var number, zero : Integer; { // Try to divide an integer by zero - to raise an exception Try zero = 0; number = 1 div zero; ShowMessage('number / zero = '+IntToStr(number)); except ShowMessage('Exception Class: '+LastExceptionClassName+' Exception Message: '+LastExceptionMessage); } }