home *** CD-ROM | disk | FTP | other *** search
- /* LEKCJA04.C
- //---------------------------------------------------------------------------
- Temat:
- Dialog z u╛ytkownikiem - wczytanie pliku tekstowego
- //---------------------------------------------------------------------------
- Funkcje:
- EXT(214) ushort ReadTxtFile(
- //---------------------------------------------------------------------------
-
- EXT(214) ushort ReadTxtFile( //
- char *fname, // nazwa pliku
- char *buf, // bufor
- uint bufsiz); // wielkoÿå bufora
-
- Opis:
- Funkcja pozwala wczytaå do bufora plik tekstowy.
- Jeÿli plik nie mieÿci si⌐ w buforze zostanie wcztyana cz⌐ÿå poczÑtkowa.
-
- Return:
- Iloÿå wczytanych lini tekstowych.
-
- Przykêad wywoêania:
- ilosc_linii = ReadTxtFile(nazwapliku,txtbuf,5000);
- */
-
- //---------------------------------------------------------------------------
- #include "std.h"
- #include "megatyp.h"
- #include "megacad.h"
- //---------------------------------------------------------------------------
- char txtbuf[5000];
- //---------------------------------------------------------------------------
- short main(char *filename,char *args )
- {
- char buf[255], lbuf[100];
- char nazwapliku[30];
- short ilosc_linii, nr_linii= 0, klawisz= 1, stroffset= 0;
-
- sprintf(nazwapliku,"C:\\autoexec.bat");
-
- ilosc_linii = ReadTxtFile(nazwapliku,txtbuf,5000);
- while( (nr_linii < ilosc_linii) && (klawisz != 3) )
- {
- nr_linii++;
- sprintf(lbuf,"linia:%d plik:\"%s\"",nr_linii,nazwapliku);
- strcpy(buf,txtbuf + stroffset);
- stroffset += (strlen(buf) + 1);
- klawisz = Message(lbuf,buf,"dalej",NULL,"przerwij",1);
- }
- return(0);
- }
- //---------------------------------------------------------------------------
-