Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Ayuda con una función (https://www.clubdelphi.com/foros/showthread.php?t=2943)

McRight2k 13-08-2003 21:36:07

Ayuda con una función
 
Hola, soy nuevo en la programación de Delphi, vengo del VB y hace mucho que programé en C, así q algunas nociones tengo :rolleyes: .

Estoy intentando leer unas funciones d unos proyectos ejemplo q tengo y me he encontrado con ésta (la q me parecía mas sencilla, se me está atragantando). Todo está claro excepto lo que he resaltado en rojo.

Código:

function TVentana.MiFuncion:Boolean;
var
x:Byte;
OK : Boolean;
begin
  MiProcedimiento($03,x);    {Procedimiento que calcula un valor y lo devuelve en la variable x}
  OK:= x=$53;

  Result:=OK;
end;

He pensado que tal vez sea un método abreviado de ésto:

Código:

if x=$53 then OK:=true else OK:=false;
es decir, que si x vale $53, entonces la función será verdadera y falsa es diferente.
Tengo mis dudas, así q me gustaría q alguien me lo confirmara.

Gracias y un saludo

sanxpue 13-08-2003 21:47:04

Holas asi es como lo piensas mi amigo regresa a la variable Ok falso o verdadero..

pero tambien puedes ahorrarte el valor Ok poniendo

Result:= x=$53;

Saludos desde Puebla, MExico

asanxt@hotmail.com


La franja horaria es GMT +2. Ahora son las 06:30:26.

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