When debugging, how can I re-execute code that has already been executed?

[yinhuajian]

I assume I have the following code:

pascal
function get1(str: string): string;
begin
  Result := 'hello:' + str;
end;

function get2(str: string): string;
begin
  Result := 'hi:' + str;
end;

procedure TForm1.Button1Click(Sender: TObject);
var
  str1: string;
  str2: string
begin
  str1 := get1('tom');
  str2 := get2('jack');
end;
My question:

I tried to set a breakpoint at str1 := get1('tom'); to observe the execution process of the get1() function. After get1() finishes executing, the code proceeds to str2 := get2('jack');.

At this point, if I want to go back to str1 := get1('tom'); without stopping the debugging session, just like in other IDEs, to observe the execution process of the get1() function again, is that possible?

[dbannon]

yinhuajian, you cannot rollback the execution point, if thats what you are asking. If you follow the debugger to the get2() call, the get1() is over.  If you just want to see the result of the get1() call, just hover the mouse over str1 and you will see it.

Maybe you want the oldest of all debugging techniques, sprinkle some writeln() in there.

Code: Pascal  [Select][+][-]

1. procedure TForm1.Button1Click(Sender: TObject);
2. var
3.   str1: string = '';
4.   str2: string = '';
5. begin
6.   writeln(str1);
7.   str1 := get1('tom');
8.   writeln(str1);
9.   writeln(str2);
10.   str2 := get2('jack');
11.   writeln(str2);
12. end;

Note that I have initialised str1 and str2 and wrapped the code in code markers, select your code and click the # button.

Davo

[ALLIGATOR]

https://drive.google.com/file/d/1kZSzNSkViBSN7U-0g4dOXSenb04gvsbV

You can do this in Lazarus trunk git [main] FpDebug