| | |
| Stránka: 1 z 1
| [ Príspevkov: 9 ] | |
Autor | Správa |
---|
Registrovaný: 05.09.08 Prihlásený: 11.11.22 Príspevky: 69 Témy: 37 | Napísal jasug: 27.11.2010 16:47 | |
|
Dobrý den, skúšam prejst pri vstupe reálnych čísiel na dve až pät desatinných miest z komponenty Edit na MaskEdit. Myslel som, že mi to poskytne väčší komfort, ale zatial mám nasledovné problémy a neviem ich vyriešit
- ak zadám plný počet znakov podla masky, napr. podla masky 9999.99 zadám číslo 1234.56 je to ok, ale ak zadám číslo 12 tak mi testovacia funkcia Val na OnExite zahlási neplatný znak na tretej pozícii, náhradný znak mám znak _, pri kontrolnom výpise stringu MaskEdit1.Text mi vypíše 12 .
- či je funkcia, ktorá po získaní fokusu mi nastaví editačný kurzor na prvú číslicu vlavo od desatinnej bodky v maske
Vdaka za Váš čas.
|
|
Registrovaný: 29.10.08 Prihlásený: 30.07.12 Príspevky: 933 Témy: 2 | Napísal coldak: 27.11.2010 18:58 | |
|
o akej funkcii Val pises ?
|
|
Registrovaný: 05.09.08 Prihlásený: 11.11.22 Príspevky: 69 Témy: 37 | Napísal autor témy jasug: 27.11.2010 19:31 | |
|
Ide o funkciu val(string, number, code) kde podla hodnoty code zistím či je konverzia zo stringu na number úspešná. Vdaka.
|
|
Registrovaný: 29.10.08 Prihlásený: 30.07.12 Príspevky: 933 Témy: 2 | Napísal coldak: 27.11.2010 19:32 | |
|
mozes kod tej funkcie tu uverejnit ?
|
|
Registrovaný: 05.09.08 Prihlásený: 11.11.22 Príspevky: 69 Témy: 37 | Napísal autor témy jasug: 27.11.2010 19:47 | |
|
Zdravím, je to vlastne procedura, ktorú takto používam pre Real number
var
code : Integer;
i : Real;
begin
...
Val( MaskEdit1.Text, i, Code);
if code <> 0 then
showmessage('Chyba');
......
end;
|
|
Registrovaný: 29.10.08 Prihlásený: 30.07.12 Príspevky: 933 Témy: 2 | Napísal coldak: 27.11.2010 19:53 | |
|
pises ze chybu zahlasi tvoja procedura Val, ako ti mam pomocte ked nezverejnis jej obsah ale iba jej aplikovanie ? ako mam vediet co konkretne robis vtej procke a nerobis to spravne ?
|
|
Registrovaný: 05.09.08 Prihlásený: 11.11.22 Príspevky: 69 Témy: 37 | Napísal autor témy jasug: 27.11.2010 20:09 | |
|
Nejde o moju proceduru, je to procedura v Delphi a ja ju používam v evente OnExit komponenty MaskEdit aby som si vo fáze ladenia odsúhlasil správnost číselného vstupu, lebo potom budú nasledovat matematické výpočty.
|
|
Registrovaný: 29.10.08 Prihlásený: 30.07.12 Príspevky: 933 Témy: 2 | Napísal coldak: 27.11.2010 22:09 | |
|
ty si si nevsimol ze mas zaskrtnute "save literal characters" ? v praxi to znamena ze vo vystupe doplni medzery na plnu dlzku formatu. skus pouzit stringreplace na odstranenie medzier a az potom validuj
|
|
Registrovaný: 05.09.08 Prihlásený: 11.11.22 Príspevky: 69 Témy: 37 | Napísal autor témy jasug: 28.11.2010 8:32 | |
|
Vdaka za radu, pri nezaskrtnutom "save literal characters" čiže formáte masky 9999.99;0; som nemal žiadny úspech, pri zaskrtnutom "save literal characters" tzn. maske 9999.99;1; a následnom použití stringreplace ja validácia bezchybná. Skoda že Delphi nemá doplnkové funkcie pre MaskEdit, druhý problém si doprogramujem. Ešte raz vdaka.
|
|
| Stránka: 1 z 1
| [ Príspevkov: 9 ] | |
Podobné témy | Témy | Odpovede | Zobrazenia | Posledný príspevok |
---|
| Komponenta MaskEdit v Delphi, Visual Basic | 1 | 760 | 11.01.2009 17:57 programator | | samsung nenajde ako bootovatelne mediun, inak ide ako ma v Optické zariadenia | 0 | 1286 | 27.03.2009 21:53 ejo | | Samsung S8300 ultra touch ako navigacia. ako na to? v Mobilné zariadenia | 6 | 1472 | 26.11.2009 22:25 Jaro | | Ako inštalovať módy ho PHPbb a ako na reklamu !!! v Redakčné systémy | 8 | 3098 | 30.03.2008 15:39 MarkoSVK | | WEB stranka.ako na nu a ako s nou v Ostatné | 13 | 1410 | 12.10.2007 21:54 Tominator | | ako nainstalovat javu do pc s pristupom ako uzivatel v Assembler, C, C++, Pascal, Java | 1 | 822 | 18.03.2008 8:40 redw | | Ako si nastavim router/modem/wifi? Citaj ako prve! v Siete | 3 | 2838 | 17.07.2015 13:52 Tonko340 | | ako kopirovat text z pdf kde je ako obrazok v Ostatné programy | 1 | 679 | 19.10.2014 20:18 liqua1 | | ako po preinstalovani mat parametre ako minuly uzivatel v Operačné systémy Microsoft | 1 | 455 | 20.08.2008 8:42 shiro | | Ako nastaviť v notebooku výkonnejšiu grafiku ako primárnu. v ATI/AMD grafické karty | 0 | 830 | 12.12.2015 21:10 krakenis | | Návod: Ako si spravit doma zmrzlinu original ako z obchodu? v Jedlo, pitie a varenie | 7 | 4077 | 22.08.2009 15:55 david3504 | | ČÍTAJ AKO PRVÉ: Ako sa správne pýtať pri skladaní počítača? v PC zostavy | 0 | 14759 | 28.09.2007 12:38 eXistenZ | | Ako je možné že maloobchody majú často lepšie ceny ako [ Choď na stránku: 1, 2 ] v Obchody, reklamácie a právo | 36 | 4391 | 20.11.2009 15:49 Googler1 | | AMD Athlon 64 3800+ 2,41Ghz ako a ako vela pretaktovat v Biosy a ladenie výkonu | 8 | 1106 | 23.10.2010 21:04 reDo | | Ako zistim ci je trieda ako singleton? v PHP, ASP | 3 | 713 | 20.07.2011 8:30 Ando | | Ako nastaviť video ako pozadie pracovnej plochy? v Operačné systémy Microsoft | 3 | 1510 | 31.03.2010 22:43 Googler1 |
| Nemôžete zakladať nové témy v tomto fóre Nemôžete odpovedať na témy v tomto fóre Nemôžete upravovať svoje príspevky v tomto fóre Nemôžete mazať svoje príspevky v tomto fóre
|
|