| | |
| Stránka: 1 z 1
| [ Príspevkov: 5 ] | |
Autor | Správa |
---|
Registrovaný: 20.11.09 Prihlásený: 02.11.14 Príspevky: 241 Témy: 58 Bydlisko: Myjava | Napísal vama: 26.01.2010 17:50 | |
|
viem, ze toto je uplne zakladna vec, ale este som to doteraz nepotreboval.
Cital som, ze podmienka CASE OF sa moze pouzit aj na porovnavanie hodnot premennich typu STRING, ale mne to nejde.
Kód: var smer: String;
Case smer of 'stop': ShowMessage('stop'); 'rovno': ShowMessage('rovno'); end;
Tak ako to je? Ja tam robim chybu, alebo sa neda retazec porovnavat cez CASE OF ?
|
|
Registrovaný: 11.01.09 Prihlásený: 19.04.24 Príspevky: 1385 Témy: 9 Bydlisko: Hrinova | Napísal Fico: 26.01.2010 18:15 | |
|
Myslím, že sa to na reťazec použiť nedá, keďže, je požadovaný ordinálny typ. Pozri sa na túto stránku, je tam postup, ako sa to dá vyriešiť.
|
|
Registrovaný: 20.11.09 Prihlásený: 02.11.14 Príspevky: 241 Témy: 58 Bydlisko: Myjava | Napísal autor témy vama: 26.01.2010 18:26 | |
|
no aj mne sa to zdalo byt divne, ale na jednej stranke som nasiel, ze sa daju porovnavat premenne typu STRING, ale to bola asi chyba
A ta uprava spociva v com presne? naindexovanie premennych?
ak tomu dobre chapam prikaz:
Kód: StringIndex(a, ['Post', 'Edit', 'Cancel'])
vrati ciselnu hodnotu, pre prave ulozeny obsah v premenej a ?
Cize ak a= Edit potom vrati hodnotu 1?
Ale aj tak mi to nejde, hlasi chybu
|
|
Registrovaný: 11.01.09 Prihlásený: 19.04.24 Príspevky: 1385 Témy: 9 Bydlisko: Hrinova | Napísal Fico: 26.01.2010 19:17 | |
|
vama píše: Cize ak a= Edit potom vrati hodnotu 1? Presne tak. vama píše: Ale aj tak mi to nejde, hlasi chybu
Zrejme si si nevšimol, že táto funkcia nie je interná v Delphi Nižšie je jej definícia:
Kód: function StringIndex(const SearchString: string; StrList: array of string): Integer; var I: Integer; begin Result:= -1; for I:= 0 to High(StrList) do if CompareText(SearchString, StrList[I]) = 0 then begin Result:= I; Break; end; end;
|
|
Registrovaný: 20.11.09 Prihlásený: 02.11.14 Príspevky: 241 Témy: 58 Bydlisko: Myjava | Napísal autor témy vama: 26.01.2010 19:48 | |
|
No uz mi to funguje
Ja som to predtym rychlo prezrel a aj som sa cudoval naco su tam tie funkcie, myslel som si, ze to je uz nejaky konkretny priklad, ale to patri k tomu ...
|
|
| Stránka: 1 z 1
| [ Príspevkov: 5 ] | |
Podobné témy | Témy | Odpovede | Zobrazenia | Posledný príspevok |
---|
| Select zavisly na case aj pocte prispevkov v danom case v Databázy | 19 | 917 | 19.09.2011 15:58 baumax | | CASE v PC skrinky, zdroje a všetky druhy chladenia | 0 | 515 | 24.01.2010 10:28 dawidko.xD | | Case v PC skrinky, zdroje a všetky druhy chladenia | 21 | 1553 | 10.02.2008 17:55 mimkork | | case v PC skrinky, zdroje a všetky druhy chladenia | 10 | 540 | 26.08.2011 21:55 bartem | | Case v PC skrinky, zdroje a všetky druhy chladenia | 1 | 454 | 01.01.2010 12:08 Cirky | | case v Modifikácie, návody a projekty | 10 | 1613 | 02.10.2007 16:55 Jopi | | Case v Kúpim | 2 | 347 | 19.07.2015 10:36 Rivon | | Case [ Choď na stránku: 1, 2 ] v PC skrinky, zdroje a všetky druhy chladenia | 31 | 2424 | 31.01.2008 14:37 dadmtb | | case v PC skrinky, zdroje a všetky druhy chladenia | 21 | 1982 | 06.12.2006 20:28 POM4R4NC | | vyber case v PC skrinky, zdroje a všetky druhy chladenia | 8 | 538 | 20.05.2011 16:25 wendigo_rgc | | Nová case v Chladiče a všetky druhy chladenia | 13 | 442 | 16.12.2017 22:12 stiv | | Nova Case v PC skrinky, zdroje a všetky druhy chladenia | 11 | 608 | 12.08.2010 22:10 Spartan.Ex | | Case MOD [ Choď na stránku: 1, 2, 3 ] v Modifikácie, návody a projekty | 76 | 5676 | 02.03.2013 9:00 athlon | | eSPe CASE v Modifikácie, návody a projekty | 0 | 1218 | 01.10.2005 20:03 XPM | | K: case v Kúpim | 15 | 1255 | 16.06.2010 18:15 winyx | | presklená case v Modifikácie, návody a projekty | 3 | 610 | 04.11.2012 3:03 rybicka |
| 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
|
|