home *** CD-ROM | disk | FTP | other *** search
/ Chip Hitware 10 / Chip_Hitware_Vol_10.iso / chiphit / online / 95netlst / psecurit.exe / USER_PRO.TXT < prev    next >
Text File  |  1996-10-12  |  526b  |  27 lines
  1. #Datei erzeugen und ÷ffnen (Turbo Pascal) [User/Programmieren]
  2.  
  3. Ein Beispiel fⁿr Programmierer, wie eine
  4. Quellcode-Datenbank aussehen kann.
  5.  
  6. var F: Text;
  7. begin
  8.   Assign(F, 'NAME.TXT');
  9.   Rewrite(F);
  10.   Writeln(F, 'Irgendwas...');
  11.   Close(F);
  12. end;
  13.  
  14.  
  15. #Datei erzeugen und ÷ffnen (Delphi) [User/Programmieren]
  16.  
  17. Ein Beispiel fⁿr Programmierer, wie eine
  18. Quellcode-Datenbank aussehen kann.
  19.  
  20. var F: TextFile;
  21. begin
  22.   AssignFile(F, 'NAME.TXT');
  23.   Rewrite(F);
  24.   Writeln(F, 'Irgendwas...');
  25.   CloseFile(F);
  26. end;
  27.