HITNO Molim odgovor

Odgovori Nova tema

2 odgovora
2.774 pregleda

HITNO Molim odgovor 17.12.2004. u 10:34 · pre 266 meseci #1

Tasterom "+" se zadati unos iz Edit Polja prebacuje u Label, medjutim posle izvršavanja komande u Edit polju ostaje znak "+". Pitanje je kako da to izbegnem, odnosno da ograničim Edit Polje da taj karakter ne upisuje. Isto važi i za Label. Puno hvala unapred!
PS: Nemojte pitati zašto tasterom +, nemam mnogo vremena da objašnjavam ali za aplikaciju je to potrebno. Hvala.

Potpis

:)) :| :( :P

Re: HITNO Molim odgovor 17.12.2004. u 10:59 · pre 266 meseci #2

Mozes recimo ovako:

Code:

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
  if key = '+' then
  begin
    label1.Caption := TEdit(Sender).Text;
    key := #13;
  end;
end;

ss.

Potpis

When something is hard to do, then it's not worth doing.

Re: HITNO Molim odgovor 17.12.2004. u 12:45 · pre 266 meseci #3

E majstore svaka čast, nisam se toga ni setio. Puno hvala. Pozdrav! :)

Potpis

:)) :| :( :P

Prijavite se da biste odgovorili u ovoj temi.Prijava Registracija

Forum kao aplikacija na telefonu

Srodne teme