1 578
editací
Změny
Vytvorená stránka „Převede řetězec na velká písmena. ;Deklarace function StrUpper(Str: PChar): PChar; ;Režim :Windows, Reálný, Chráněný ;Poznámky :StrUpper převede Str...“
Převede řetězec na velká písmena.
;Deklarace
function StrUpper(Str: PChar): PChar;
;Režim
:Windows, Reálný, Chráněný
;Poznámky
:[[StrUpper]] převede Str na velká písmena a vrátí Str.
;Viz také
:[[StrLower]]
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]]
;Deklarace
function StrUpper(Str: PChar): PChar;
;Režim
:Windows, Reálný, Chráněný
;Poznámky
:[[StrUpper]] převede Str na velká písmena a vrátí Str.
;Viz také
:[[StrLower]]
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]]