Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Trucos (https://www.clubdelphi.com/foros/forumdisplay.php?f=52)
-   -   LowerCase, UpperCase de caracteres (https://www.clubdelphi.com/foros/showthread.php?t=80421)

dec 07-06-2006 21:08:11

LowerCase, UpperCase de caracteres
 
Las siguientes funciones devuelven el caracter que se pase como parámetro, bien en minúscula, bien en mayúscula:

Código Delphi [-]
function CharAnsiLowerCase(const C: Char) : Char;
var
  P: PChar;
begin
  P := AnsiLower(@C);
  Result :=  Char(C);
end;

function CharAnsiUpperCase(const C: Char) : Char;
var
  P: PChar;
begin
  P := AnsiUpper(@C);
  Result :=  Char(C);
end;


La franja horaria es GMT +2. Ahora son las 23:11:39.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi