Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.

Provera, string u stringu?

[es] :: Pascal / Delphi / Kylix :: Provera, string u stringu?

[ Pregleda: 1541 | Odgovora: 7 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

Aleksandar Ilić
Software Developer
Beograd

Član broj: 15867
Poruke: 417
*.smin.sezampro.yu.

Sajt: www.ailic.rs


Profil

icon Provera, string u stringu?24.08.2004. u 14:48

Kako da proverim da li se odredjeni string (npr. 'Dejan') nalazi u drugom stringu (npr. 'Dejan Bodiroga')?
Da li ima neka gotova funkcija, ako ima koja?

Unapred hvala.
„Naposletku, suština saznavanja nije u tome gubimo li igru, već kako je gubimo,
šta time spoznajemo, čemu nas je poraz naučio i kako nas to menja. Gubiti na određen
način znači - dobijati.”

Richard Bach
24.08.2004. u 14:48 

reiser
Marko Paunovic
Beograd

Član broj: 7895
Poruke: 2006
*.dialup.neobee.net.



Profil

icon Re: Provera, string u stringu?24.08.2004. u 17:45
Code:

If Pos(DeoStringa, CeoString) > 0 Then
  ...

DeoStringa ti je recimo Dejan, a CeoString recimo Dejan Bodiroga. Ako se DeoStringa ne nalazi u CeoString, onda ce Pos vratiti 0, u suprotnom vraca poziciju na kojoj pocinje DeoStringa.
24.08.2004. u 17:45 

morlic
Milos Orlic
Beograd

Član broj: 6081
Poruke: 735
*.144.EUnet.yu



Profil

icon Re: Provera, string u stringu?05.09.2004. u 00:04
Laptopovi

Pogledaj i PosEx. Naravno obrati paznju da funkcija razlikuje mala i velika slova, tako da "DEJAN" i "Dejan" nisu isti. Ali:


Pos(UpperCase('Dejan'), 'DEJAN B.') = 1
05.09.2004. u 00:04 

Aleksandar Ilić
Software Developer
Beograd

Član broj: 15867
Poruke: 417
*.smin.sezampro.yu.

Sajt: www.ailic.rs


Profil

icon Re: Provera, string u stringu?07.09.2004. u 13:13
PosEx funkcija neće da radi kod mene. Imam WinXP, Delphi 7.

Kad sam već tu, ima li neka slična ovakva funkcija koja samo provera da li se DeoStringa nalazi na početku CelogStringa?
„Naposletku, suština saznavanja nije u tome gubimo li igru, već kako je gubimo,
šta time spoznajemo, čemu nas je poraz naučio i kako nas to menja. Gubiti na određen
način znači - dobijati.”

Richard Bach
07.09.2004. u 13:13 

morlic
Milos Orlic
Beograd

Član broj: 6081
Poruke: 735
*.221.EUnet.yu



Profil

icon Re: Provera, string u stringu?07.09.2004. u 21:14
Kod mene radi. Probaj sledece: stavi na novu formu dugme i na OnClick stavi:

Code:

procedure TForm1.Button1Click(Sender: TObject);
begin
  if PosEx('Miki', 'Miki') > 0 then Caption := 'ok' else Caption := 'not ok'
end;


U Uses klauzulu unit-a stavi i StrUtils
07.09.2004. u 21:14 

Aleksandar Ilić
Software Developer
Beograd

Član broj: 15867
Poruke: 417
*.smin.sezampro.yu.

Sajt: www.ailic.rs


Profil

icon Re: Provera, string u stringu?08.09.2004. u 19:19
Nisam stavio StrUtils u Uses i zato nije htelo, sad hoće.
„Naposletku, suština saznavanja nije u tome gubimo li igru, već kako je gubimo,
šta time spoznajemo, čemu nas je poraz naučio i kako nas to menja. Gubiti na određen
način znači - dobijati.”

Richard Bach
08.09.2004. u 19:19 

Plamenko

Član broj: 510
Poruke: 35
*.186.eunet.yu



Profil

icon Re: Provera, string u stringu?08.09.2004. u 23:10
Citat:
Alekstrade: PosEx funkcija neće da radi kod mene. Imam WinXP, Delphi 7.

Kad sam već tu, ima li neka slična ovakva funkcija koja samo provera da li se DeoStringa nalazi na početku CelogStringa?
Citat:
Marko Paunovic:
Code:

If Pos(DeoStringa, CeoString) > 0 Then
  ...

DeoStringa ti je recimo Dejan, a CeoString recimo Dejan Bodiroga. Ako se DeoStringa ne nalazi u CeoString, onda ce Pos vratiti 0, u suprotnom vraca poziciju na kojoj pocinje DeoStringa.


Covek je lepo odgovorio na pitanje pre nego sto si ga i postavio..
08.09.2004. u 23:10 

Aleksandar Ilić
Software Developer
Beograd

Član broj: 15867
Poruke: 417
*.smin.sezampro.yu.

Sajt: www.ailic.rs


Profil

icon Re: Provera, string u stringu?09.09.2004. u 12:43
Ma zapazio sam to tek kad sam poslao pitanje.
Ne znam kako mi je to ranije promaklo.
„Naposletku, suština saznavanja nije u tome gubimo li igru, već kako je gubimo,
šta time spoznajemo, čemu nas je poraz naučio i kako nas to menja. Gubiti na određen
način znači - dobijati.”

Richard Bach
09.09.2004. u 12:43 

[es] :: Pascal / Delphi / Kylix :: Provera, string u stringu?

[ Pregleda: 1541 | Odgovora: 7 ] > FB > Twit

Postavi temu Odgovori

Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.