home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 2001 December / pcwk12201b.iso / Reklamy / CAD-Projekt / MegaCAD-4_5 / CC / LEKCJA04.C_ / LEKCJA04.C
C/C++ Source or Header  |  1995-09-01  |  2KB  |  53 lines

  1. /*                      LEKCJA04.C
  2. //---------------------------------------------------------------------------
  3. Temat:
  4.         Dialog z u╛ytkownikiem - wczytanie pliku tekstowego
  5. //---------------------------------------------------------------------------
  6. Funkcje:
  7.         EXT(214) ushort ReadTxtFile(   
  8. //---------------------------------------------------------------------------
  9.  
  10. EXT(214) ushort ReadTxtFile(   // 
  11.              char *fname,      // nazwa pliku
  12.              char *buf,        // bufor
  13.              uint bufsiz);     // wielkoÿå bufora
  14.  
  15. Opis:
  16.     Funkcja pozwala wczytaå do bufora plik tekstowy.
  17.     Jeÿli plik nie mieÿci si⌐ w buforze zostanie wcztyana cz⌐ÿå poczÑtkowa.
  18.  
  19. Return:
  20.     Iloÿå wczytanych lini tekstowych.
  21.  
  22. Przykêad wywoêania:
  23.     ilosc_linii = ReadTxtFile(nazwapliku,txtbuf,5000);
  24. */
  25.  
  26. //---------------------------------------------------------------------------
  27. #include "std.h"
  28. #include "megatyp.h"
  29. #include "megacad.h"
  30. //---------------------------------------------------------------------------
  31. char txtbuf[5000];
  32. //---------------------------------------------------------------------------
  33. short main(char *filename,char *args )
  34. {
  35.    char  buf[255], lbuf[100];
  36.    char  nazwapliku[30];
  37.    short ilosc_linii, nr_linii= 0, klawisz= 1, stroffset= 0;
  38.  
  39.    sprintf(nazwapliku,"C:\\autoexec.bat");  
  40.  
  41.    ilosc_linii = ReadTxtFile(nazwapliku,txtbuf,5000);
  42.    while( (nr_linii < ilosc_linii) && (klawisz != 3) )
  43.    {
  44.       nr_linii++;
  45.       sprintf(lbuf,"linia:%d  plik:\"%s\"",nr_linii,nazwapliku);
  46.       strcpy(buf,txtbuf + stroffset);
  47.       stroffset += (strlen(buf) + 1);
  48.       klawisz = Message(lbuf,buf,"dalej",NULL,"przerwij",1);
  49.    }
  50.    return(0);
  51. }
  52. //---------------------------------------------------------------------------
  53.