funcion con parametro "raro"

[emeceuy]

hola, tengo una consulta sencilla, estuve leyendo pero no encontré como hacerlo si es que se puede...

me gustaría crear una función así: function mifuncion(parametro: letraABoC): boolean;

el tema es que quiero pasarle como parámetro A, B o C solamente, como hago? porque el tipo char ademitiria todas las letras... y la otra pregunta, necesariamente tendrías que escribir así para llamar la funcion?: mifuncion('A') o puedo evitar las comillas y escribir mifuncion(A), eso se puede?

muchas gracias como siempre !

[[coso]]

hola, tendrias que hacer una enumeration

Código Delphi [-]
type TLetraABoC = (ltA,ltB,ltC);

procedure MiFuncion(a : TLetraABoC);
begin
end;

MiFuncion(ltA);

[*Caro*]

Empezado por emeceuy

hola, tengo una consulta sencilla, estuve leyendo pero no encontré como hacerlo si es que se puede...

me gustaría crear una función así: function mifuncion(parametro: letraABoC): boolean;

el tema es que quiero pasarle como parámetro A, B o C solamente, como hago? porque el tipo char ademitiria todas las letras... y la otra pregunta, necesariamente tendrías que escribir así para llamar la funcion?: mifuncion('A') o puedo evitar las comillas y escribir mifuncion(A), eso se puede?

Hola, si es de tipo Char no, tendrías que verificar antes si son esas letras:

Código Delphi [-]
var
 letra : Char;
begin
 ......
 if (letra='A') or (letra='B') or (letra='C') then
  mifuncion(letra);

pero si tu te defines tu tipo de dato si se puede, sería así:

Código Delphi [-]
type
 TLetras=(A,B,C);
..........
..........
 
function mifuncion(letra : TLetras) : Boolean;
begin
 //
end;

............
begin
 mifuncion(A)
end;

Saluditos

[emeceuy]

Que notable, solucionado ! muchas gracias a ambos !
saludos !