Obsah fóra
PravidláRegistrovaťPrihlásenie




Odpovedať na tému [ Príspevkov: 5 ] 
AutorSpráva
Offline

Užívateľ
Užívateľ
CASE OF

Registrovaný: 20.11.09
Prihlásený: 02.11.14
Príspevky: 241
Témy: 58
Bydlisko: Myjava
Príspevok NapísalOffline : 26.01.2010 17:50

viem, ze toto je uplne zakladna vec, ale este som to doteraz nepotreboval. :oops:
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 ?


Offline

Skúsený užívateľ
Skúsený užívateľ
CASE OF

Registrovaný: 11.01.09
Prihlásený: 19.04.24
Príspevky: 1385
Témy: 9
Bydlisko: Hrinova
Príspevok NapísalOffline : 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ť.


Offline

Užívateľ
Užívateľ
CASE OF

Registrovaný: 20.11.09
Prihlásený: 02.11.14
Príspevky: 241
Témy: 58
Bydlisko: Myjava
Príspevok Napísal autor témyOffline : 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 :(


Offline

Skúsený užívateľ
Skúsený užívateľ
CASE OF

Registrovaný: 11.01.09
Prihlásený: 19.04.24
Príspevky: 1385
Témy: 9
Bydlisko: Hrinova
Príspevok NapísalOffline : 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;


Offline

Užívateľ
Užívateľ
CASE OF

Registrovaný: 20.11.09
Prihlásený: 02.11.14
Príspevky: 241
Témy: 58
Bydlisko: Myjava
Príspevok Napísal autor témyOffline : 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 ... :oops:


Odpovedať na tému [ Príspevkov: 5 ] 


Podobné témy

 Témy  Odpovede  Zobrazenia  Posledný príspevok 
V tomto fóre nie sú ďalšie neprečítané témy. Select zavisly na case aj pocte prispevkov v danom case

v Databázy

19

917

19.09.2011 15:58

baumax Zobrazenie posledných príspevkov

V tomto fóre nie sú ďalšie neprečítané témy. CASE

v PC skrinky, zdroje a všetky druhy chladenia

0

515

24.01.2010 10:28

dawidko.xD Zobrazenie posledných príspevkov

V tomto fóre nie sú ďalšie neprečítané témy. Case

v PC skrinky, zdroje a všetky druhy chladenia

21

1553

10.02.2008 17:55

mimkork Zobrazenie posledných príspevkov

V tomto fóre nie sú ďalšie neprečítané témy. case

v PC skrinky, zdroje a všetky druhy chladenia

10

540

26.08.2011 21:55

bartem Zobrazenie posledných príspevkov

V tomto fóre nie sú ďalšie neprečítané témy. Case

v PC skrinky, zdroje a všetky druhy chladenia

1

454

01.01.2010 12:08

Cirky Zobrazenie posledných príspevkov

V tomto fóre nie sú ďalšie neprečítané témy. case

v Modifikácie, návody a projekty

10

1613

02.10.2007 16:55

Jopi Zobrazenie posledných príspevkov

Táto téma je zamknutá, nemôžete posielať nové príspevky alebo odpovedať na staršie. Case

v Kúpim

2

347

19.07.2015 10:36

Rivon Zobrazenie posledných príspevkov

V tomto fóre nie sú ďalšie neprečítané témy. Case

[ Choď na stránku:Choď na stránku: 1, 2 ]

v PC skrinky, zdroje a všetky druhy chladenia

31

2424

31.01.2008 14:37

dadmtb Zobrazenie posledných príspevkov

V tomto fóre nie sú ďalšie neprečítané témy. case

v PC skrinky, zdroje a všetky druhy chladenia

21

1982

06.12.2006 20:28

POM4R4NC Zobrazenie posledných príspevkov

V tomto fóre nie sú ďalšie neprečítané témy. vyber case

v PC skrinky, zdroje a všetky druhy chladenia

8

538

20.05.2011 16:25

wendigo_rgc Zobrazenie posledných príspevkov

V tomto fóre nie sú ďalšie neprečítané témy. Nová case

v Chladiče a všetky druhy chladenia

13

442

16.12.2017 22:12

stiv Zobrazenie posledných príspevkov

V tomto fóre nie sú ďalšie neprečítané témy. Nova Case

v PC skrinky, zdroje a všetky druhy chladenia

11

608

12.08.2010 22:10

Spartan.Ex Zobrazenie posledných príspevkov

V tomto fóre nie sú ďalšie neprečítané témy. Case MOD

[ Choď na stránku:Choď na stránku: 1, 2, 3 ]

v Modifikácie, návody a projekty

76

5676

02.03.2013 9:00

athlon Zobrazenie posledných príspevkov

V tomto fóre nie sú ďalšie neprečítané témy. eSPe CASE

v Modifikácie, návody a projekty

0

1218

01.10.2005 20:03

XPM Zobrazenie posledných príspevkov

Táto téma je zamknutá, nemôžete posielať nové príspevky alebo odpovedať na staršie. K: case

v Kúpim

15

1255

16.06.2010 18:15

winyx Zobrazenie posledných príspevkov

V tomto fóre nie sú ďalšie neprečítané témy. presklená case

v Modifikácie, návody a projekty

3

610

04.11.2012 3:03

rybicka Zobrazenie posledných príspevkov


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

Skočiť na:  

Powered by phpBB Jarvis © 2005 - 2024 PCforum, webhosting by WebSupport, secured by GeoTrust, edited by JanoF
Ako väčšina webových stránok aj my používame cookies. Zotrvaním na webovej stránke súhlasíte, že ich môžeme používať.
Všeobecné podmienky, spracovanie osobných údajov a pravidlá fóra