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

string konvertor

[es] :: Pascal / Delphi / Kylix :: string konvertor

[ Pregleda: 1768 | Odgovora: 6 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

stefki
Makedonija

Član broj: 191877
Poruke: 60
77.28.97.*



+5 Profil

icon string konvertor24.06.2011. u 20:02 - pre 155 meseci
Pozdrav svima

ako moze neko da mi slozi delphi kod za sledece

imam ovaj text

B: QLG74M YBQYGD

kad kliknem na button da mi ga konvertira u sledece

korisnik = QLG74M
sifra = YBQYGD


[Ovu poruku je menjao stefki dana 26.06.2011. u 12:00 GMT+1]
 
Odgovor na temu

savkic
Igor Savkić

Moderator
Član broj: 92186
Poruke: 2739



+92 Profil

icon Re: string konvertor25.06.2011. u 10:51 - pre 155 meseci
> imam ovaj text
> B: QLG74M YBQYGD 1 0 0 { 0:0:1 }
> kad kliknem na button da mi ga konvertira u sledece
> user = QLG74M
> password = YBQYGD
> reshare = 1
> hop = 1

Koliko vidim treba da razdvoji stringove prema spejsu ili dvotački. Skini sa neta JCL (Jedi code library) u unitu JclStrings ćeš naći StrToken i StrTokens pa iskoristi koja ti više odgovara.
 
Odgovor na temu

Aleksandar Đokić

Član broj: 13478
Poruke: 4793
*.dynamic.isp.telekom.rs.



+638 Profil

icon Re: string konvertor25.06.2011. u 22:05 - pre 155 meseci
he B linija za CS :)

po razmacima uzmi posto user i pass ne mogu imati razmake

 
Odgovor na temu

stefki
Makedonija

Član broj: 191877
Poruke: 60
95.180.230.*



+5 Profil

icon Re: string konvertor26.06.2011. u 11:02 - pre 155 meseci
Evo da uprostimo malo

B: QLG74M YBQYGD

kad kliknem na button da mi ga konvertira u sledece

korisnik = QLG74M
sifra = YBQYGD
 
Odgovor na temu

savkic
Igor Savkić

Moderator
Član broj: 92186
Poruke: 2739



+92 Profil

icon Re: string konvertor26.06.2011. u 12:07 - pre 155 meseci
> Evo da uprostimo malo
> B: QLG74M YBQYGD
> korisnik = QLG74M
> sifra = YBQYGD

I dalje važi, koristi StrToken ili StrTokens za razdvajanje stringa na pojedine reči. Bilo je ovde ranije i primera za njihovu upotrebu.
 
Odgovor na temu

tkaranovic
Tomislav Karanović
Beograd

Član broj: 220507
Poruke: 307



+18 Profil

icon Re: string konvertor27.06.2011. u 03:58 - pre 155 meseci
Evo i jedan primer koji radi sa AnsiReplaceStr:

Code:

procedure TForm1.Button1Click(Sender: TObject);

  function StrToStrings(const S: string; const Separator: char): TStrings;
  begin
    Result := TStringList.Create;
    Result.Text := AnsiReplaceStr(S, Separator, #13#10);
  end;
begin
  with StrToStrings('B: QLG74M YBQYGD 1 0 0 { 0:0:1 }', ' ') do
    try
      ShowMessage( 'korisnik = ' + Strings[1] + #13+#10 +
                      'sifra = ' + Strings[2]);

      with StrToStrings(Strings[7], ':') do
        try
          ShowMessage( 'dvotacka1 = ' + Strings[0] + #13+#10 +
                       'dvotacka2 = ' + Strings[1] + #13+#10 +
                       'dvotacka3 = ' + Strings[2]);
        finally
          Free;
        end;

    finally
      Free;
    end;
end;

U ovom primeru je jedino bitno šta radi StrToStrings a ovo ostalo nije bitno šta i kako radi, ostalo je (skraćeno) samo tu da prikaže rezultat "konvertovanja". Inače JCL ima isto(imenu) StrToStrings koja radi slično kao ova.
 
Odgovor na temu

stefki
Makedonija

Član broj: 191877
Poruke: 60
95.180.230.*



+5 Profil

icon Re: string konvertor27.06.2011. u 16:41 - pre 155 meseci
Hvalati to je to



[Ovu poruku je menjao stefki dana 27.06.2011. u 18:00 GMT+1]
 
Odgovor na temu

[es] :: Pascal / Delphi / Kylix :: string konvertor

[ Pregleda: 1768 | Odgovora: 6 ] > FB > Twit

Postavi temu Odgovori

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