prisvoiavane
6 отговора
187 прегледа
prisvoiavane
mi znachi interesyva me slednoto:
imam nikolko primenlivi ot tip integer s koito se iazvyrshvat matematicheski deistvia
i me interesyva kak tochno tezi promenlivid a polychat stoinost na form ot tip Tedit
probvah akto zadarm naprimer
a := Edit1;
ili
a := Edit1.Text;
i razni takiva ma ne yspiah ta shte sum mn. blagodaren ako niakoi mi kaje kak tochno
promenlivata da polychi stoinosta ot edit box -a
imam nikolko primenlivi ot tip integer s koito se iazvyrshvat matematicheski deistvia
i me interesyva kak tochno tezi promenlivid a polychat stoinost na form ot tip Tedit
probvah akto zadarm naprimer
a := Edit1;
ili
a := Edit1.Text;
i razni takiva ma ne yspiah ta shte sum mn. blagodaren ako niakoi mi kaje kak tochno
promenlivata da polychi stoinosta ot edit box -a
Re: prisvoiavane
Само още една забележка , за да си спестиш досадната проверка дали въведеното в Edit полетата е валидно цяло число просто забрани да се въвежда нещо различно с проста процедурка , която обработва OnKeyPress :
procedure НещоСи.OnKeyPress(Sender: TObject; var Key: Char);
begin
If not( Key in['0'..'9']) then Key:=#0;
end;
procedure НещоСи.OnKeyPress(Sender: TObject; var Key: Char);
begin
If not( Key in['0'..'9']) then Key:=#0;
end;
Re: prisvoiavane
akto go narpavia taka pri kompilirane mi dava nekva zabeleshka tam s niakakvi nevalidni neshta s ok i help
Re: prisvoiavane
пич, що се ебаваш?!?
или си толкоз зле, че за 6 часа не си стоплил как се обръща string в integer, и то след като знаеш коя функция да ползваш... ако това ти е случая - я земи го зарежи програмирането!
--------------------------------------
Започва Път от моят праг...
или си толкоз зле, че за 6 часа не си стоплил как се обръща string в integer, и то след като знаеш коя функция да ползваш... ако това ти е случая - я земи го зарежи програмирането!
--------------------------------------
Започва Път от моят праг...
Редактирано от Hateras на
Re: prisvoiavane
Да се пита не е срамно... А дали човека ще става програмист, си е негов зор. Все пак форума е не само за знаещи и можещи. Би било добре да се сещаш, че на всеки му се случва да не знае нещо дребно и елементарно, и се налага да пита за него. Хубаво е да се отговаря така, както ти би искал да отговорят на теб.
чети и дишай по-леко
чети и дишай по-леко
Re: prisvoiavane
Wse pak e hubwao da mogat da pitat kakto trqbwa nali?
pri "kompilirane wadi neshto s ok i cancel" naprawo me smaza kato informatiwnost a i da beshe dal po-golqm fragmet ili pone tipa na a am ne sichki ochakwat w toq forum da sme mediumi i sami da se seshtame
btw za nachinaesh e po dobre da polzwa StrToIntDef che ne raiswa exception
------------------------------
I got a COMPILER, and I'm not afraid to use it!
pri "kompilirane wadi neshto s ok i cancel" naprawo me smaza kato informatiwnost a i da beshe dal po-golqm fragmet ili pone tipa na a am ne sichki ochakwat w toq forum da sme mediumi i sami da se seshtame
btw za nachinaesh e po dobre da polzwa StrToIntDef che ne raiswa exception
------------------------------
I got a COMPILER, and I'm not afraid to use it!