Unit system explizit angeben

[khh]

hallo zusammen,
in folgender function nöchte ich die function system.pos verwenden.

Delphi-Quellcode:

function StrTran(Textstring,Such,Ersetz:string):string;
var nPos, nCounter :integer;
begin
nCounter := 0;
While Pos(Such,Text)>0 do
begin
nPos := Pos(Such,Text);
Delete(Textstring,nPos,length(Such));
Insert(Ersetz,Textstring,nPos);
inc(nCounter);
if nCounter > 255 then
break;
end;
Result := Textstring;
end;

Function Pos (const Substr : AnsiString; const Source : AnsiString) : SizeInt; wenn ich die funktion als funktion von Torm einbinde,
also function TForm.StrTran(Textstring,Such,Ersetz:string):strin g;

dann klappt das auch.
Sobald ich aber die Funktion in eine separate unit auslagere also:

function StrTran(Textstring,Such,Ersetz:string):string;

dann nimmt er nicht mehr die funtion aus systemh.inc , sondern aus varianth.inc, was zur Folge hat, dass die Argumente nicht passen.

ein expliziter Aufruf von system.pos funktioniert auch nicht.

Was mache ich falsch?

Achtung Lazarus!

Danke Gruss KHH

[Luckie]

Ist Pos nicht in der Unit SysUtils enthalten?

[Stevie]

Zitat von Luckie:

Ist Pos nicht in der Unit SysUtils enthalten?

Nein

Zitat von khh:

in folgender function möchte ich die function system.pos verwenden.

Geht voll qualifizieren (also while System.Pos(Such, Text) > 0 do ) in Lazarus nicht?

[Luckie]

Zitat von Stevie:

Zitat von Luckie:

Ist Pos nicht in der Unit SysUtils enthalten?

Nein

Tatsächlich. Hast recht.

[khh]

Zitat von Stevie:

Zitat von Luckie:

Ist Pos nicht in der Unit SysUtils enthalten?

Nein


Geht voll qualifizieren (also while System.Pos(Such, Text) > 0 do ) in Lazarus nicht?

doch normalerweise schon,
aber auch wenn ich system.pos in beiden Varianten verwende ändert das nix am Ergebnis.
In einem Fall gehts nach systemh, im anderen nach varianth

[Teekeks]

Dann musst du auch dort das system. davor setzen...

[khh]

Zitat von Teekeks:

Dann musst du auch dort das system. davor setzen...

hab ich doch

[Teekeks]

hmmm, wo genau geht er denn noch in die variantsh?