Examples Delphi

PROCEDURE IniRefresh(F:TFileName);
BEGIN
WriteProfileString(NIL,NIL,PChar(F));
END;