PPCOMPILER - Forum - ppCompiler

Recherche

Articles & Documents

Déplier Fermer Tutoriaux

Lettre d'information

CPDB.Net

Nouvelles des Amis

aldweb Site

Visites

visiteurs

visiteurs en ligne

Webmaster - Infos

Webmestre

Favoris

Version mobile

Forum - ppCompiler - Sujet n°39

Forum - Forum
- ppCompiler

Sujet n° 39

StrStr Function

le 14/09/2011 @ 11:09
par DearJohn

Anonyme

In the "stringscommented.pas" collection I found this nice function:

function StrPosRelative(const Str, Token: String):UInt8;
var
lvar1, lvar2: tPIS;
begin
lvar1.recPtr:=StrStr(Str, Token);
lvar2.recPtr:=@Str;
StrPosRelative:=lvar1.recInt-lvar2.recInt;
end;

Unfortunately I couldn't find the "StrStr" function in any library.

Do you have any hint for me to use this function?

Regards, Reinhard.

Réponse n° 1 -------- le 15/09/2011 @ 22:03 par Pierre visiteur	Hi ! I found these references into my old PP and naPP API tables : PP 68k function StrStr(const str,token:String):StringPtr; inline(SYSTRAP,$A0CD); // PP with SYSTRAP = $4E4F; naPP (native ARM) function StrStr (const str, token:string):stringptr;inline($E519C008,$E1A0E00F,$E59CF7B8);//naPP full arm If your still in trouble with these functions, I thing you can find an equivalent function into the free Pascal sources. Have fun Pierre, south of France, 22h05 and 27°C... glass of wine.