midstr

[jvsoest]

Hallo,

Ik krijg bij delphi 7 onder Vista de melding dat midstr niet gedeclareerd is, dit is toch gewoon een standaardfunctie? Onderstaand de code. Bedankt vast

procedure TForm1.Button1Click(Sender: TObject);
var strInvoer, strUitvoer : string ;
var intLengte, intT: integer;
begin
strInvoer:=form1.edit1.text;
intlengte:=Length(strInvoer);
for intT := 0 to intlengte-1 do
begin
strUitvoer:= MidStr(strInvoer,intlengte-intt, 1);
end;

end;

end.

 

[evertVB]

Heb je

     Str_Utils

in je uses staan?

(en dan zonder underscore - de forumsoftware maakt er steeds S****Utils van...?)