StopScript is a special function which allows you to break your script for some reason in you pressed the button Stop in main window.
var
dbf :integer;
r :integer;
begin
dbf := OpenBase( 'filename.dbf' );
if dbf <> 0 then
begin
for r := 0 to RecCount(dbf)-1 do
begin
if StopScript then break;
MarkDeleted(dbf, r);
end;
CloseBase(dbf);
end;
end.
|
