lardmaster
2006-10-20 23:28:02
look, everywhere i go and everyone i ask tells me that it is outdated, but i think in this case it is necesary to make the script simple
the goto necesary line is imbedded inside two if statements and two for statements, unless there is some double break command, i need to know how to make a goto statement. help appreciated.
begin
for p:=1 to length(s) do begin
Temp2 := Copy ( s, p, 8 );
if Temp2 = 'artist: ' then begin
Temp2:='';
j:=p+8;
for j:=p+8 to p+26 do begin
Result := Result + s[j];
if (GetKeyCode(s[j+1]) = 186)then GOTO finish;
end;
end
end;
finish:
end;
the goto necesary line is imbedded inside two if statements and two for statements, unless there is some double break command, i need to know how to make a goto statement. help appreciated.