Přidáno 499 bajtů,
8. 10. 2012, 16:54 Převede řetězec na malá písmena.
;Deklarace
function StrLower(Str: PChar): PChar;
;Režim
:Windows, Reálný, Chráněný
;Poznámky
:[[StrLower]] převede Str na malá písmena a vrátí Str.
;Viz také
:[[StrUpper]]
Vzorový příklad
{StrUpper.PAS}
{Vzorový příklad pro funkci StrUpper.}
{ Pro Windows: }
{ uses Strings, WinCrt; }
uses Strings;
var
S: array[0..79] of Char;
begin
Readln(S);
Writeln(StrUpper(S));
Writeln(StrLower(S));
end.
[[Category:String]]