Einzelnen Beitrag anzeigen

Benutzerbild von Mirilin
Mirilin

Registriert seit: 21. Dez 2002
Ort: Lenzburg
861 Beiträge
 
Delphi 6 Professional
 
#7

Re: Syntax??

  Alt 12. Apr 2004, 11:05


Delphi-Quellcode:
//Zahl einer der Wete
function CheckIsVal(const a : Integer):Boolean;
begin
  Result := a in [16,33,65];
end;
//Zahle zwischen den Werten
function CheckIsBetween(const a : Integer):Boolean;
begin
  Result := a in [16..65];
end;
mfg Tobias
Tobias
Die Physik ist für die Physiker eigentlich viel zu schwer.
  Mit Zitat antworten Zitat