Hm, pocetnicko pitanje

[ StratOS @ 25.02.2004. 10:35 ] @

Hm, da poceo sam i sa delphijem zbog DB-a i slicno.
pitam se zasto mi sledeca rutina ne radi.

Htio bi da u neka unosna polja ogranicim unos brojki, slovova i ostalih karaktera
parametar te funkcije da char kod KeyPress procedure tog polja.
Nebi htio da pishem svaku proceduru za svako unosno polje, parametre koje posaljem jest Char,koji je bio pritisnut i dozvoljeni Char u array-u

nesto slicno ovom :

Code:

function TFrmOsn.VnosLe(Ch:Char;Lahko:array of Char):Char;
begin
if Ch in Lahko then
Result:=Ch
else
Result:=#0;
end;

kod unosnog polja kod KeyPress bi recimo dao

Code:

VnosLe(Key,[#8,#13,#44..#57,#127]);

greska se javi kod funkcije (Ch in Lahko):
[Error] Osn.pas(131): Operator not applicable to this operand type

kako to rijeshiti ?

hvala unaprijed ...

[ overflow @ 25.02.2004. 12:10 ] @

(1) ili Lahko mora biti skup (set)
(2) ili ispitivanje da li je element niza moras vrsiti for petljom ili vidi mislim da ima i neka funkcija koja to radi, ako te mrzi da pises jednu petljicu.