Autor Téma: text v memo1 a rozparsovani  (Přečteno 152 krát)

Offline Kony

  • Plnoletý
  • ***
  • Příspěvků: 211
  • Karma: 1
    • Verze Delphi: Delphi 7
text v memo1 a rozparsovani
« kdy: 22-05-2018, 15:47:09 »
V memo1 mam nacteny obsah souboru (nebo muze byt i primo stazeny z internetu, coz by bylo lepsi) a potrebuji z toho souboru vytahnout nejaky informace

obsah souboru vypada takto

Kód: Delphi [Vybrat]
  1. {"entries":[{"id":111615,"server":"192.168.131.33","server_port":9981,"peer":"IPadresa1","peer_port":45314,"started":1526980389,"type":"HTTP","user":"login1"},{"id":111600,"server":"192.168.131.33","server_port":9981,"peer":"IPadresa2","peer_port":56504,"started":1526979776,"type":"HTTP","user":"login2"},{"id":110384,"server":"192.168.131.33","server_port":9982,"peer":"IPadresa3","peer_port":49805,"started":1526896675,"type":"HTSP","user":"login3"}],"totalCount":3}

a potreboval bych z toho vytahnout IPadresa1 a k tomu priradit login1 a potom na dalsi radek IPadresa2 a k tomu login2 atd

v bashi na linuxu bych to umel :))) ale v delphi to ne a ne poskladat

Online Delfin

  • Guru
  • *****
  • Příspěvků: 862
  • Karma: 42
  • SW konzultant
    • Verze Delphi: 2009, Tokyo
Re:text v memo1 a rozparsovani
« Odpověď #1 kdy: 22-05-2018, 15:50:48 »
Najdi si JSON parser.
I'm a soldier, so don't panic!

Offline Kony

  • Plnoletý
  • ***
  • Příspěvků: 211
  • Karma: 1
    • Verze Delphi: Delphi 7
Re:text v memo1 a rozparsovani
« Odpověď #2 kdy: 22-05-2018, 16:00:03 »
a to jako pridam do delphi projektu ???

To ale vypada dooost silene :))))

spis jsem myslel..

Najdi "peer":" a ","peer_port a to co je mezi tim je IP adresa1, najdi HTTP"," a "}, a c oje mezi tim je login1

atd

takto to prave resim v bashi.. tak sjem myslel ze to tady bude nejak podobne
« Poslední změna: 22-05-2018, 16:09:39 od Kony »

Offline Kony

  • Plnoletý
  • ***
  • Příspěvků: 211
  • Karma: 1
    • Verze Delphi: Delphi 7
Re:text v memo1 a rozparsovani
« Odpověď #3 kdy: 22-05-2018, 16:42:25 »
na to asi funkce Pos a nebo PosEx

Offline raul

  • Plnoletý
  • ***
  • Příspěvků: 209
  • Karma: 11
    • Verze Delphi: FPC :D
Re:text v memo1 a rozparsovani
« Odpověď #4 kdy: 23-05-2018, 09:24:44 »
Jezisi Kriste. SuperObject. Stahni, pridej do uses a podivej se na par prikladu.
Lazarus 1.6.3:), FPC, Intel/Arm, Windows/Linux

 

S rychlou odpovědí můžete používat BB kódy a emotikony jako v běžném okně pro odpověď, ale daleko rychleji.

Jméno: E-mail:
Ověření:
Kolik je šest plus čtyři (slovem):