My libraries for Turbo Pascal

Unit olf_software

Description
Uses
Classes, Interfaces, Objects and Records
Functions and Procedures
Types
Constants
Variables

Description

 

Overview

Functions and Procedures

procedure shareware_careware;
procedure init_licence(ch : string);
procedure init_olf_message(numero : integer);
procedure init_olf_software(soft_name : string; copyright : string);
procedure init_ligne_olf_software(soft_name : string; copyright : string);
procedure aff_olf_message;

Constants

olf_soft_header_1 = #8'Olf Software program: ';
olf_soft_header_2 = #10#13#10'Never change this file, otherwise, the ' + 'program will not run...'#10#13#26#0;
nb_max_util = 25;
mess_nothing = 0;
mess_freeware = 1;
mess_shareware = 2;
mess_careware = 3;
mess_demo = 4;
num_dist : longint = 0;
num_util : longint = 0;
mess_num : integer = 0;
editeur : string = '';
utilisateur : string = '';
code_prog : string [8] = ' ';
code_licence : string [8] = ' ';

Description

Functions and Procedures

procedure shareware_careware;
 
procedure init_licence(ch : string);
 
procedure init_olf_message(numero : integer);
 
procedure init_olf_software(soft_name : string; copyright : string);
 
procedure init_ligne_olf_software(soft_name : string; copyright : string);
 
procedure aff_olf_message;
 

Constants

olf_soft_header_1 = #8'Olf Software program: ';

Auteur: Pr‚martin Patrick. Date: 15/08/1991. 19/08/1991. 22/08/1991. 23/08/1991. 25/08/1991. 26/08/1991. 27/08/1991. 09/09/1991. 13/11/1991. 27/12/1991. 26/04/1992. 27/07/1992. 28/07/1992. (Interface Multi-Langues) 30/07/1992. 05/08/1992. 22/11/1992. 13/12/1992. 30/12/1992. 01/01/1993. 02/01/1993. 22/03/1993. Langage: Turbo Pascal 6.0 23/03/1995. Langage: Borland Pascal 7.0 But: Pr‚sentation des logiciels sous le label Olf_Software.

olf_soft_header_2 = #10#13#10'Never change this file, otherwise, the ' + 'program will not run...'#10#13#26#0;

Ins‚rer le code du programme.

nb_max_util = 25;
 
mess_nothing = 0;

Nombre maximal d'utilisations d'un programme non enregistr‚.

mess_freeware = 1;
 
mess_shareware = 2;
 
mess_careware = 3;
 
mess_demo = 4;
 
num_dist : longint = 0;
 
num_util : longint = 0;
 
mess_num : integer = 0;
 
editeur : string = '';
 
utilisateur : string = '';
 
code_prog : string [8] = ' ';
 
code_licence : string [8] = ' ';
 
My libraries for Turbo Pascal (c) 1990-2025 Patrick PREMARTIN - Powered by PasDoc
Generated by PasDoc 0.16.0.