Registriert seit: 21. Dez 2002
Ort: Lenzburg
861 Beiträge
Delphi 6 Professional
|
Re: Syntax??
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.
|