www.onesofts.com
OneSofts
Accueil
News
Contact
Livre D'OR
Mailing-Liste
 
FreeWares
CoOL UtiL
StegaCoOL
AolCvZoli
-------------
-------------
 
Ressources
Icones
Sons Midi
-------------
-------------
 
Sources Delphi
Multimédia
Graphique
Form
Internet
Jeux Flash
 
Tutoriels Delphi
MultiLecteur
-------------
-------------
Débuter
 
Trucs et Astuces
Delphi
 
Agent
empocher.com
goodemails.com
promo-clic.com
mailorama.fr
web.click-fr.com
 
Liens
DelphiCooL
-------------
-------------
-------------
-------------
 
www.onesofts.com : Logiciels gratuits, sources delphi, icones, sons midi, Gagner de l'argent, Jeux
 
Débuter en delphi ( Cours 1 )
 

Les Principaux raccourcis que nous utiliserons.

F1 Aide de delphi
F9 Execute le programme
Ctrl+S Enregistrer
Maj+Ctrl+S Tout enregistrer
F11 Inspecteur d'objets
Maj+ Alt+F11 Arborscence d'objets
Ctrl+F2 Réinitialise le programme
Maj+F11 Ajouter un fichier au projet


Commencez par créer une nouvelle application : ( Fichier / Nouveau / Application)


En language de programmation nous appellons la fiche ( Form), car celle ci fait parti des objets de classe TForm. Lorsque vous visualisez le code source du programme vous pouvez constater que votre Form1 correspond à :

type
TForm1 = class(TForm)


Pressez la touche F11 afin d'afficher l'inspecteur d'objets.

Quelques propriétés de la Form à l'aide de l'inspecteur d'objets:

Caption Corresponds au texte du titre de votre Form.
Color Couleur d'arrière plan de votre Form.
Cursor Curseur qui sera affiché lorsque le pointeur de votre souris passera sur la Form.
Height Hauteur de votre Form en pixels.
Width Largeur de votre Form en pixels.
WindowState Permet de définir si la form doit apparaittre reduite, de taille maximale ou normale à l'écran.
BorderStyle Permet de définir l'aspect de votre Form.
BorderIcons: Cette propriété permet définir les icones dans la barre de titre.
Visible: Cette propriété permet de rendre la Form visible ou invisible.

En utilisant certains composants de la palette Standard, nous allons créer notre premier programme qui permettra de modifier le caption de notre form lorsque nous cliquerons sur le bouton ou lorsque nous ecrirons dans la partie texte de notre Edit1.

En Utilisant l'inspecteur d'objets (F11) Modifiez la propriété de votre Form Height = 170 puis Width = 275.
Ensuite sur votre form insérez les composants suivant de la palette standard:
1 panel, et sur le panel insérez 1 Label, 1 Button ainsi que 2 Edit afin d'obtenir ceci.

En Utilisant l'arborscence d'objets (Maj - Alt - F11) sélectionnez votre Label1

Puis à l'aide l'inspecteur d'objets (F11) modifiez la propriété Caption de votre Label1 en écrivant Propriété caption de la Form.

Afin de vous familliariser avec l'inspecteur d'objets, modifiez aussi la propriété Font de votre Label1 en cliquant sur les ... à droite de Font

Style Gras, Effets Souligné, Couleur Bleu, Taille 8.

Name
Palette
Caption
Font =>
Style
Effets
Couleur
Taille
Label1
Standard
Propriété caption de la Form
Gras
Souligné
Bleu
8

Vous devriez obtenir ceci :

En Utilisant l'arborscence d'objets ainsi que l'inspecteur d'objets Mofifiez la propriété Caption de votre Panel1 ainsi que de votre Buttonl, puis la propriété Text de votre Edit1 puis Edit2.

Une Form, un Panel, un Label et bouton ont une propriété Caption

Un Edit possède une propriété Text

Name
Palette
Caption
Text
Panel1
Standard
Vide
Button1
Standard
Modifier
Edit1
Standard
Vide
Edit2
Standard
Vide

Nous allons maintenant enregistrer notre projet ( Fichier / Tout enregistrer) ou (Maj- Ctrl-S) ou encore cliquer sur l'icone .
Enregistrez Unit1.pas sous le nom Main.pas puis Project1.dpr sous le nom de ModifierCaptionForm.dpr.

Passons maintenant au code qui permettra de modifier le caption actuel de la form et d'afficher à la place le texte que nous écrirons dans l'Edit1.
Sélectionnez votre Edit1 et dans la partie Evènement de votre Inspecteur d'objets faites un double Click gauche à droite de OnChange dans la partie vide.

Entrez le code suivant puis pressez la touche F9

procedure TForm1.Edit1Change(Sender: TObject);
begin
Form1.Caption := Edit1.Text; //Code à écrire.
end;

Si tout c'est déroulé correctement, ce que vous écrirez dans l'Edit1 apparaittra sur le caption de votre form.

Passons maintenant au code qui permettra de modifier le caption actuel de la form et d'afficher à la place le texte que nous écrirons dans l'Edit2 lorsque nous cliqueront sur le bouton (Button1) .
Sélectionnez votre
bouton (Button1) et dans la partie Evènement de votre Inspecteur d'objets faites un double Click gauche à droite de OnClick dans la partie vide.

procedure TForm1.Button1Click(Sender: TObject);
begin
Form1.Caption := Edit2.Text; //Code à écrire.
end;

Enregistrer votre projet delphi en cliquant sur , puis presser la touche F9.

---- FIN ----

Le 16 Novembre 2007

Télécharger le code source

Vous pouvez utilisez l'aide de delphi en cliquant sur votre Form puis en pressant F1, afin d'avoir toutes les informations au niveau des propriétés, des évenements ainsi que des Exemples disponibles.


unit Main;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, ExtCtrls;

type
TForm1 = class(TForm)
Panel1: TPanel;
Label1: TLabel;
Edit1: TEdit;
Button1: TButton;
Edit2: TEdit;
procedure Edit1Change(Sender: TObject);
procedure Button1Click(Sender: TObject);
private
{ Déclarations privées }
public
{ Déclarations publiques }
end;

var
Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Edit1Change(Sender: TObject);
begin

Form1.Caption := Edit1.Text; //Code à écrire.
end;

procedure TForm1.Button1Click(Sender: TObject);
begin

Form1.Caption := Edit2.Text; //Code à écrire.
end;

end.

 
 
Annuaire kimiweb.net répertoire généraliste de ressources Internet gratuit Free META Tag Help Analyzer