Hola wolfran_hack.
Una que te permite extraer lo comprendido entre el texto:
lon=" y la siguiente:
"
Código Delphi
[-]
...
uses StrUtils;
procedure ....
var
p1, p2: Integer;
begin
Memo1.Text := 'Tengo todo un memo con un codigo fuente y necesito sacar' +
' el valor de entre: lon="-58.54236984" y mostrarlo como '+
'-58.54236984 ideas¿?';
p1 := Pos('lon="', Memo1.Text) + Length('lon="');
p2 := PosEx('"', Memo1.Text, p1);
ShowMessage(Copy(Memo1.Text, p1, p2 - p1));
...
Saludos