[El Sanchez]

Подскажите пожалуйста как сделать обновление программы, если она уже установлена? »

Gugle, Upgrades

возвращает позицию последнего вхождения соответствия в строку »

читать дальше »

Код:

function StrRStrI(pszSource, pszLast, pszSrch: PChar): PChar; external 'StrRStrIA@shlwapi.dll stdcall';

//
function LastPos(SubStr, S: String): Integer;
begin
    Result := Length(S) - Length(StrRStrI(S, '', SubStr)) + 1;
    if Result = Length(S) + 1 then Result := 0;
end;

procedure InitializeWizard();
var
    i: integer;
begin
    i := LastPos('hf', 'rttrhf657hf6544');
end;