Школоло / Говнокод #19861 Ссылка на оригинал

0

  1. 1
  2. 2
  3. 3
  4. 4
  5. 5
  6. 6
  7. 7
  8. 8
  9. 9
  10. 10
  11. 11
  12. 12
  13. 13
  14. 14
  15. 15
  16. 16
  17. 17
function CanonicPath(const PathName:string):string; forward;
begin
	SetLength(Result,Length(PathName));
	if PathCanonicalize(PChar(Result), PChar(PathName)) then
	SetLength(Result, PChar(StrLen(Result)))
	else
	Result:=PathName;
end;

var
	i:integer;
	path:string;
begin
 {...}
	for i:=1 to 200 do
	Path:=PathCanonicalize(Path);
{...}

"а вот и таран!.. Святые отцы-каноники посылают нам его!"

Запостил: fajes_rown fajes_rown, (Updated )

Комментарии (6) RSS

Добавить комментарий

Помни, guest, за тобой могут следить!

    А не использовать ли нам bbcode?

    ↑
    8
    ↓