MaskEdit i uslov

MaskEdit i uslov 09.04.2005. u 12:43 · pre 262 meseca #1

Na koji nacin je moguce u EditMask zadati uslov koji se brojevi mogu uneti?
npr. EditMask je u formatu tako da se mogu upisati brojevi telefona(011)222-999
i kako da se prva dva broja u zagradi mogu upisati samo 1 ili 0 a ostali po izboru

Re: MaskEdit i uslov 10.04.2005. u 10:36 · pre 262 meseca #2

Koristi OnChange event za proveru šta je uneto.

Re: MaskEdit i uslov 10.04.2005. u 18:43 · pre 262 meseca #3

Ajde ako ti nije problem napisi mi neki primer

Re: MaskEdit i uslov 11.04.2005. u 13:00 · pre 262 meseca #4

Citat:

mzarko: kako da se prva dva broja u zagradi mogu upisati samo 1 ili 0 a ostali po izboru

Ovo je samo jedna od mogućnosti, neoptimizovana, onako iz glave...

Code:
procedure TForm1.Edit1Change(Sender: TObject);
var
  i: Integer;
  t: String;
begin
  i := Length(Edit1.Text);
  t := Edit1.Text;
  case i of
    0: Exit;
    1, 2:
      if Pos(t[i], '01') = 0 then
        SetLength(t, i - 1);
  else
    if Pos(t[i], '0123456789') = 0 then
      SetLength(t, i - 1);
  end;
  Edit1.Text := t;
end;

p.s. nema potrebe koristiti TMaskEdit, koristi običnu TEdit kontrolu

Re: MaskEdit i uslov 11.04.2005. u 14:18 · pre 262 meseca #5

moze i maskedit, pogledaj svojstvo Mask, imas tu par primera kako se pisu maske

Potpis

Ride the rainbow, crack the sky

DIY gitare, pojacala i efekti www.diy-fever.com

Re: MaskEdit i uslov 11.04.2005. u 15:36 · pre 262 meseca #6

Citat:

bancika: moze i maskedit, pogledaj svojstvo Mask, imas tu par primera kako se pisu maske

Svojstvo Mask ne postoji (Delphi 7), a ako misliš na EditMask, ne vidim kako se može omogućiti unos iz primera koji je mzarko napisao (unos samo cifara 0 i 1)?

Re: MaskEdit i uslov 11.04.2005. u 18:50 · pre 262 meseca #7

Hvala Vam na trudu, ali sa ovim nisam mogao nista da uradim.
Kada se unese prvi ispravan broj a drugi neispravan
kursor se vrati na pocetak i onda kao prvi broj moguce je
uneti bilo koji broj.
Ako se za taj unos koristi Edit umesto MaskEdita na koji je
nacin moguce da se za prvi '(' i peti ')' karakter zada uslov da se
unesu zagrade a za a za deveti uslov da bude '-' a 2 i 3 karakter
da je moguce upisati samo brojeve '0 i 1' a za 4,6,7,8,10,11 i 12
bilo koji broj.

Re: MaskEdit i uslov 11.04.2005. u 20:56 · pre 262 meseca #8

Uzmi i nadji LMD komponente, nemoj da se mucis...
I pogledaj mask editor od maskedit-a; mislim da mozes da definises masku...
Posle samo onChange event napravi da proverava ispravnost unetog polja (da ne unese prazno izmedju dva broja i sl.), npr "10 5-1236 8".

Potpis

Still going strong...

Re: MaskEdit i uslov 11.04.2005. u 21:05 · pre 262 meseca #9

Imam LMD komponente version 6 probacu i to

Forum kao aplikacija na telefonu

Srodne teme