4 lines
73 B
ObjectPascal
4 lines
73 B
ObjectPascal
procedure test;
|
|
begin
|
|
raise Exception.Create('Sample Exception');
|
|
end;
|