Code: Select all
OraScript1.SQL.Text := 'exec for i in 1..10 loop null; end loop;';
ShowMessage(IntToStr(OraScript1.Statements.Count)); // SHOWED 2
Code: Select all
OraScript1.SQL.Text := 'exec for i in 1..10 loop null; end loop;';
ShowMessage(IntToStr(OraScript1.Statements.Count)); // SHOWED 2