Új hozzászólás Aktív témák

• #787 GodHeart senior tag Blade!!! #780

  Új Válasz 2005-11-25 17:46:13 #787

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  GodHeart

  senior tag

  válasz Blade!!! #780 üzenetére

  lehet hülyeséget írok, de nekem ez volt a hiba. ma fél órám ment rá Szal akár írsz a fájba akár nem mindig be kell csukni. pl rewrite-al a szöveges fájlba írsz valamit, utána close-al bekell csuknod, különben valójában nem fog írni bele semmit, vagy a jó ég tudja, de a léyneg, hogy a fájl üres marad. mondom csak egy lehetőség, de nekem ez volt a hibám!
  
  Viszont nekem is lenne kérdésem
  Szóval adott egy olyan txt fájl, amiben nem összefüggő szövegt van, hanem mondjuk enter miegymás is található a fájlban. Namost ugye ezt beolvasva csak az első sort olvassa be a pascal, ha egy sima a : string változóba teszem. Ezért arra gondoltam, hogy charakterenként egy 2D-s tömbbe fogom beolvasni, onnan mit kezdek vele még nem tudom, de most ez tűnik a legjobb gondolat tovább folytatásnak. Viszont! Mikor dekralálni szeretném a 2D-s tömbet, azaz: q : array[i1..i15,k1..k15] of char vagy string; akkor az i1-nél elakad és undefinied akármit írni ki. Pedig itt még nagy gond nem igen lehet, de nem bírok rájönni.. a könyvből amiből tanulok így van, és nem értem miért nem megy!

• #781 Drótszamár őstag Blade!!! #780

  Új Válasz 2005-11-23 23:17:47 #781

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  Drótszamár

  őstag

  válasz Blade!!! #780 üzenetére

  Húú de régen voolt már pascal.
  
  Write(f1,r1);
  
  nem kéne ,1 tehát Write(f1,r1,1);
  
  ha nem akkor sorry a hülyeségért.
  
  

  
  with r1 do
  begin
  Write('Program neve: '); ReadLn(pn);
  Write('CD vagy DVD? '); ReadLn(cdvd);
  Write('A program m‚rete: '); ReadLn(meret);
  Write('Beszerz‚s d tuma: (EEHHNN) '); ReadLn(datum);
  end;
  
  Write(f1,r1);
  

  
  
  ezt meg így csinálnám a helyedben.
  
  
  [Szerkesztve]

• #779 b14 senior tag Blade!!! #778

  Új Válasz 2005-11-23 23:04:21 #779

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  b14

  senior tag

  válasz Blade!!! #778 üzenetére

  Bocsáss meg, nem kötözködés:

   close(f1);
  menuir;
  
  Readkey;

  
  Ez a menuir; mire hivatkozik?

Új hozzászólás Aktív témák