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

Provera, string u stringu?

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

[ Pregleda: 1066 | Odgovora: 7 ]

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

Aleksandar Ilić
Vlasotince

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



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.
"Zaslepljujuće neznanje vodi nas krivim putem. O! Smrtnici jadnici, otvorite oči!"
Leonardo da Vinci
24.08.2004. u 14:48 

reiser
Vranje

Član broj: 7895
Poruke: 1884
*.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

Moderator
Član broj: 6081
Poruke: 723
*.144.EUnet.yu



Profil

icon Re: Provera, string u stringu?05.09.2004. u 00:04
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ć
Vlasotince

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



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?
"Zaslepljujuće neznanje vodi nas krivim putem. O! Smrtnici jadnici, otvorite oči!"
Leonardo da Vinci
07.09.2004. u 13:13 

morlic
Milos Orlic
Beograd

Moderator
Član broj: 6081
Poruke: 723
*.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ć
Vlasotince

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



Profil

icon Re: Provera, string u stringu?08.09.2004. u 19:19
Nisam stavio StrUtils u Uses i zato nije htelo, sad oće.
"Zaslepljujuće neznanje vodi nas krivim putem. O! Smrtnici jadnici, otvorite oči!"
Leonardo da Vinci
08.09.2004. u 19:19 

Plamenko

Član broj: 510
Poruke: 34
*.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ć
Vlasotince

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



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.
"Zaslepljujuće neznanje vodi nas krivim putem. O! Smrtnici jadnici, otvorite oči!"
Leonardo da Vinci
09.09.2004. u 12:43 

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

[ Pregleda: 1066 | Odgovora: 7 ]

Postavi temu Odgovori

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