Tarvis sellainen bat-tiedosto saada aikaan joka ottaa tekstitiedostosta sanotaan teksti.txt tietyn kohda ja tulostaa sen (echo). Kun ei ohjelmointi lähde niin ei lähde vaikka hyvin yksinkertainen tämäkin on. Jollain for-funktiolla se pitäisi jotenkin saada mutta kun ei niin ei.
Tiedoston sisältö on tämä:
{
"a": "a42b34af",
"b": false,
"d": 25,
"e": true,
"f": true,
"g": [
{
Pitäisi saada ulos numero/kirjansarja "a42b34af" ilman lainausmerkkejä.
BAT-ohjelmointi
koodia...
2
237
Vastaukset
- C--
For ei ole funktio.
Kannattaisi muutenkin varmaan tehä vaikka C:llä. - Helposti+Lazarus
Lazarus on erittäin hyvä jos haluat tehdä nopeasti graafisella käyttöliittymällä varustetun ohjelman (saatavilla moniin käyttöjärjestelmiin).
Tuon voi tehdä Lazaruksella monin tavoin tässä yksi esim:
...
function lueTieto( TiedostonNimi, aluntunniste, lopuntunniste:string):string;
var
sl:TStringList;
s: string;
i: integer;
begin
sl := TStringList.Create ;
sl.LoadFromFile( TiedostonNimi );
s := sl.text;
FreeAndNil( sl );
i := ansipos( aluntunniste, s) length( aluntunniste );
Delete(s, 1, i-1 );
i := ansipos( lopuntunniste, s);
result := copy( s, 1, i-1 );
end;
procedure TForm1.Button1Click(Sender: TObject);
var
s:string;
begin
s := lueTieto('testitxt.txt', '"a": "', '",' );
Memo1.Lines.Add( s );
end;
...
Kokeile tuolla ja voit parantaa sitä helposti vaikkapa näillä ohjeilla:
http://wiki.freepascal.org/Howto_Use_TOpenDialog/fi
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
IL - Patteriauto syttyi parkkihallissa Tampereella - 50 autoa LUNASTUKSEEN!
"Palon aikaan parkkihallissa oli 90 autoa, joista noin 50 tuhoutui palossa korjauskelvottomiksi. Lisäksi palo vaurioitti25645582Kristillisistä Siionisteista asiallista tietoa Hesarissa.
KD ja Persut ovat kaiken takana avoimesti!4411349Persut JYTKYTTÄÄ ylös, ohi kepun! +2,1 %
Persut palasi kolmen suurimman joukkoon ja on matkalla kohti kevään 2027 eduskuntavaalivoittoa. Sosialistit ovat syöksy22110961Sanna Marin saa ylistystä Hillary Clintonilta
Jos joku ei tiedä kuka tämä rouva Hillary Clinton on, niin kerrottakoon "fun fact", eli hän on se keneltä Donald Trump389775Ja jälleen uusi latauksessa olleen sähköauton palo! Nyt Keravan Prisman parkkihallissa.
IS 3.10.2025 Latauksessa ollut sähköauto syttyi yöllä tuleen Keravan Prisman parkkihallissa, Keski-Uudenmaan pelastusla898606Gallup, PS:lle JÄRISYTTÄVÄ nousu, SDP suurin laskija
https://yle.fi/a/74-20186114 PS kovaa vauhtia nousemassa ennen 2027 vaaleja suurimmaksi puolueeksi. Nyt mennään jo etua2776654Kalja-Kristus Kutsuu Luokseen
Nyt on Oikea Hetki Ottaa Ryppyys Vastaan! Lue Pelastusryyppy ja tee Promillista elämäsi Herra! Pelastusryyppy on teksti22525Jos mä joisin
Itteni känniin nyt, voi olla että mä tunnustaisin sulle kuinka ihastunut oon ollu suhun viimeiset 2 vuotta. Eikä mua pys442350Perussuomalaisiin minä luotan
Bensaa raaskii taas tankata ja ensi vuonna laskee ruoan verotus. Nämä muutokset parantavat pienituloisten asemaa.122334- 452154