关于调试时的一个奇怪小问题(50)

代码形式如下function GetPostStr(aStr, bStr, RowStr: string): string;var a, b: integer;begin a := pos(astr, rowstr) + length(astr); b := posEX(bstr, rowstr,A); result := trim(midstr(rowstr, a, b - a));end;调试时，F7进入这个函数，按F8，程序先跳到 end语句。再按F8，才开始从a:=pos(astr, rowstr) + length(astr);开始执行。

function GetPostStr(aStr, bStr, RowStr: string): string;var a, b: integer;begin [red]result:='';[/red] a := pos(astr, rowstr) + length(astr); b := posEX(bstr, rowstr,A); result := trim(midstr(rowstr, a, b - a));end;先初始化一下~~试一下~~

谢谢。但是有时候又不这样。

接受答案了.