Discussion :

[da_latifa]

salut tt le monde,
en fait, je ss débutante en delphi et j'aimerais travailler avec les classes , je veux créer une fonction que je peux appeller de n'importe quel programme.
j'ai une petite idée sur la création d'une classe
mais si vous pouvez m'aider en me donnant un exemple de a à z c'est à dire depuis le lancement du delphi, svp c'est très urgent pour moi , aidez moi et
merci à tt le monde.

[sjrd]

http://delphi.developpez.com/cours/
Ils sont là pour ça.

Personne ne te refera un cours complet, comme tu le demandes, sur le forum.

[Clorish]

Personne ne te refera un cours complet, comme tu le demandes, sur le forum.

Par contre ouvrir un thread en posant successivements les questions que tu rencontre au cours de ton implementation sur des themes precis en demandant au cas par cas des explications sur des points precis du codage, ca sera volontier

Sinon, juste pour bien demarrer :
1 - Ouvrir Delphi
2 - Creer une nouvelle application
3 - Creer une nouvelle unitee
4 - Coder l'unitee avec la classe dedans
5 - Ajouter l'unitee qui contient la classe a l'initee qui contient la form
6 - Faire appel aux fonctions de la lcasse (apres creation) a partir d'un interface de test implementée sur la form
7 - Creer une "veritable" applciation
8 - Ajouter l'unitee contenant la classe a u projet (ajouter unitee)
9 - Declarer l'unitee dans la clause uses des unitees fesait appel a ta classe
10 - Manipuler ton unitee et ta classe.

Exemple de Classe :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
 
Unit MonUnit;
 
Interface
 
Type
  TMaClasse = Class(...);
  Private
    MaVarLocale : Integer;
    Procedure MaProcedureLocale;
  Public
    MaVarGlobale : Integer;
    Procedure MaPRocedureGlobale;
  End;
 
Implementation
 
Procedure TMaClasse.MaPRocedureLocale;
Begin
...
End;
 
Procedure TMaCLasse.MaProcedureGlobale;
Begin
 
End;

Creation et manipulation et Liberation d'une instance :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
 
Uses MonUnit;
[...]
Var MaCLasse : TMaClasse;
[...]
MaClasse := TMaCLasse.Create;
[...]
MaClasse.MaVarGlobale := 5;
MaCLasse.MaProcedureGlobale;
[...]
MaClasse.Free;

Apres le mieux est de bien suivre les tutos et de matter le plus de codes sources possible