Forum de mathématiques - Bibm@th.net
Vous n'êtes pas identifié(e).
- Contributions : Récentes | Sans réponse
Pages : 1
#1 11-07-2011 10:09:26
- ngatilio
- Membre
- Inscription : 18-09-2010
- Messages : 14
creation d' unité ( pascal ou delphi)
-une unité c'est comme une personne qui a une tête , un tronc et les quatre membres.
-créer une unité c'est un programme à part entière qui nécessite des connaissances sur :
les déclarations,
const max=10;
type NUM_CODE=record
NOM : array['a'..'z'] of string[26];
NUM : array[1..max] of integer;
end;
DATE_CODE=record
JJ : 1..31;
MM:1..12;
AA:1800..2011;
end;
var
CODE: NUM_CODE;
DATE:DATE_CODE;
les fonctions et procédures ,
procedure attribute ( var x,y : integer; value:boolean);
begin
instructions;
end;
function RRotate ( x_top:longint;x_bottom:longint):longint;
begin
instructions;
end;
des manipulations des directives,
mot reservé ASSIGN ,IORESULT
{I+}
instructions;
{I-}
ou encore {T+} ,...
des connaissances en language assembleur,
procedure safe ; external
asm
;bienvenue sur l'assembleur
instructions
;bye bye
end
et la mani du code ASCII
var regs:registers;
begin
with regs do
begin
instructions;
end;
end;
revenons à la bête :
schema d'une unité:
UNIT name_unit;
INTERFACE
uses graph, strings,dos,crt...
var
value: longint; etc...
declarations de certaines fonctions et procedures
IMPLEMENTATION
declarations des fonctions et procedures {dire ce que l'unité doit faire}
instructions;
BEGIN{initialisation des variables}
instructions;
END.
Hors ligne
Pages : 1