Pascal - Units(bibliotecas), uses.

Utilização de Units

Vejamos de forma básica as units embutidas no Turbo Pascal. As units são

conjuntos de rotinas prontas para serem usadas pelo programador. Uma unit é, na

verdade, uma biblioteca de funções e procedimentos. Vejamos a lista das unidades do

Pascal:

CRT: esta unidade é a mais utilizada na programação Pascal. Ela possui a

maior parte das rotinas e variáveis de geração de som, controle de vídeo e

teclado;

DOS: esta unidade possui as rotinas que envolvem a utilização do sistema

operacional, na maior parte das vezes permitindo controles de baixo nível;

GRAPH: esta unidade possui rotinas destinadas à manipulações gráficas;

OVERLAY: esta unidade possibilita gerenciar as atividades de um

programa, desta forma, é possível aproveitar uma mesma área de memória

para rodar várias rotinas diferentes, economizando memória;

PRINTER: esta unidade permite declarar um arquivo tipo texto com o

nome LST e associá-lo à impressora; 

SYSTEM: esta unidade possui a maior parte das rotinas padrão da

linguagem Pascal, não necessitando ser citada para ser usada, pois o Pascal já a executa de forma automática.

Para se fazer uso deste recurso é necessário o uso da instrução uses situada antes

da declaração da instrução var.

Sintaxe:

uses <unidade>; 

Ex.: 

Program none;

uses crt;

var

Begin

        Writeln('Programa');
        clrscr; {procedimento para limpar a tela}
        Writeln('Fim');

End.

No programa acima escreve uma mensagem na tela como o nome "Programa" e depois chama uma instrução que esta armazenada na unit crt, se não estivesse declarado antes la em cima crt não poderia chama-la, o programa geraria um erro na compilação. No PascalZim essa instrução vai funcionar normalmente mesmo se não declarar antes na uses, isso acontece por que no Pascalzim, ja vem com todas as funções da crt e de outras bibliotecas também, as mais usadas, portanto a linha uses crt, nessa IDE poderia ser descartada. Mas para continuar ao estudo desse conteúdo é necessário baixar uma IDE que dê suporte para as Units como o Free Pascal ou o Dev Pascal.
Vejam alguns Exemplos.:
Atenção para fazer esse procedimento citado logo abaixo é necessário usar alguns desse programas citados acima, Free Pascal(recomentado), Dev Pascal, Delphi ou Lázarus.
1º Crie um novo programa e nele cole esse código:

Unit biblioteca;
Interface 

uses crt;

Const MAX=5;

    {Aqui é um resumo das funções e procedimento disponíveis para a chamada}
    function menu(n:integer):integer;
    procedure cadastro(var nome:string; var idade:integer);
    
Implementation    

    function menu(n:integer):integer;
    var op:integer;
    Begin
        Writeln('Menu');
        Writeln;
        Writeln('1 Cadastrasr');
        Writeln('0 Sair');
        Write('Opcao: ');
        readln(op);            
        clrscr;
        menu:=op;
    End;
    procedure cadastro(var nome:string; var idade:integer);
    Begin
        Write('Informe Nome: ');
        readln(nome);
        Write('Informe Idade: ');
        readln(idade);
    End;    
Begin

    
end.

Agora salve esse código como biblioteca.pas, o mesmo nome que tem la em Unit.

2º Crie outro programa e nele cole esse código, este será o programa principal(main) :

program main;
uses biblioteca;
var
    nome: string;
    idade,opcao:integer;    
begin
    opcao:=menu(opcao);    
        if (opcao = 1) then
            cadastro(nome,idade);            
    Writeln('Constante: ',max);
end.

Agora salve este como o nome que você preferir. Eu salvei como main.pas. Atenção os aquivos devem estar na mesma pasta.
Para executar sua nova biblioteca é necessário abrir e compilar, então abra o aquivo com o sua IDE de preferência, o file biblioteca.pas e depois vá em compilar, após isso abra o arquivo main.pas e depois em compilar agora é só executar o main.pas. Se tudo for feito feito corretamente o seu programa utilizará as funções armazenadas na sua biblioteca.pas.

unit xxxx – Representa o nome físico do arquivo onde está o código da referida unidade. Por meio desse nome, units podem usar outras units.
interface – A seção interface começa com a palavra reservada interface e termina no inicio da seção implementation. Nessa seção, são declarados constantes (const), tipos (types), variáveis (var), procedures e functions, que estão disponíveis para outras units ou outros programas. Essas declarações são chamadas de públicas (public), indicando que as mesmas podem ser usadas por quaisquer outras unidades dentro do mesmo programa. A declaração de procedure e function, na seção interface, refere-se apenas ao cabeçalho das mesmas. O seu conteúdo será descrito na seção implememntation.
uses – É a lista de outras units que estão ligadas ao programa atual.
var - Nessa área, são declaradas todas as variáveis que podem ser acessadas em qualquer lugar do programa, portanto, consideradas públicas ou globais.
implementation - Esta seção começa com a palavra reservada implementation e termina em initialization. Neste local estão descritas todas as procedures e functions do programa.


Nesse link tem todas as units do Free Pascal http://www.freepascal.org/docs-html/rtl/index.html
Muito bom esse conteúdo aprendi muita coisa com ele.
O contéudo aqui nesse poste é requisito para quem vai estudar Linguagem Orientada a Objeto como o Object Pascal em Lazarus/Delphi.

Categories: Pascal , Programação