Prise en main de Delphi 2005

Sélectionnez Options d'environnement dans la liste de gauche.

Vous trouverez ici les anciennes options d'environnement, comme les options d'autoenregistrement et les modifications de L'EDI lors de l'exécution du programme.

Sélectionnez maintenant Concepteur VCL sous Options d'environnement|Options Delphi. Ici, vous trouverez les options concernant la conception de fiches VCL.

C'est sans doute la partie qui subira le plus de modifications, étant donné les changements de la syntaxe et de sa mise en surbrillance par défaut.

Sélectionnez Options de l'éditeur. Se trouvent là les options générales de l'éditeur et de l'édition.

Sous Options de l'éditeur, sélectionnez Couleur. Vous pourrez ici modifier les couleurs des syntaxes en visualisant un aperçu en HTML, en C#, En C/C++ et en Delphi.
Comme dit plus haut, beaucoup de couleurs ont changé.

Si vous n'aimez toujours pas les complétions automatiques et ce genre d'outils, sélectionnez Audit de code et modifiez les options en conséquence.

Ici, les options par défaut n'ont pas changé, mais vous pourrez retrouver des options que beaucoup de Delphistes modifient, notamment l'interruption des exceptions Delphi sous Options du débogueur|Débogueurs Borland|Exceptions du langage.

Mises à part les améliorations graphiques (qui au passage sont présentes dans tout Delphi 2005), l'inspecteur d'objets n'a pas changé.

Les propriétés sont triées par défaut par catégorie. Si vous préférez les trier par nom, utilisez le sous-menu Trier|Par Nom du menu contextuel de l'inspecteur.

La palette des composants, qui pour rappel est devenue une fenêtre placée en bas à gauche (par défaut) de l'EDI, a été sensiblement améliorée.

Elle liste tous les composants installés triés par palette, puis par ordre alphabétique. Jusque là rien d'impressionnant.

En revanche, si vous sélectionnez la palette, puis entrez quelques touches au clavier, le titre de la fenêtre fonctionnera comme une zone de texte et un tri filtré sera effectué automatiquement.

Par exemple, si vous entrez la lettre 'm', la palette ressemblera à ceci :

Pour supprimer le filtre, utilisez la touche Retour arrière pour retirer les lettres une à une.

Voici l'interface de notre application :

Je ne détaillerai pas la procédure de conception de cette interface. Ça n'en vaut pas la peine.

Toutefois vous pourrez remarquer dans le bas de la fenêtre du milieu (celle qui contient la fiche) trois onglets : Code, Conception et Historique.

L'onglet Code vous permet de visualiser le code en rapport avec la fiche que vous éditez. L'onglet Conception vous permet de modifier l'apparence de la fiche. Et l'onglet Historique vous permet de gérer l'historique du fichier.

Hormis la beauté graphique de l'éditeur, on remarque de petits [-] dans la gouttière. Ces boutons permettent de replier les différentes parties du code.
Vous pouvez ainsi replier :

• l'unité entière ;
• la partie interface ;
• chaque définition de classe ;
• la partie implémentation ;
• chaque implémentation de routine/méthode.

Outre ces parties repliables par défaut, vous pouvez en définir de personnalisées grâce à la directive de compilation {$REGION}.

implémentation

{$REGION 'Ressources'}
{$R *.dfm}
{$ENDREGION}

...

Une fois ces deux lignes placées autour de la liaison du .dfm, un nouveau petit [-] s'ajoute devant la ligne {$REGION 'Ressources'}. Si vous cliquez dessus, le code situé jusqu'au {$ENDREGION} se replie.

Je trouve cette fonctionnalité très pratique, si on n'en abuse pas.

Double-cliquez sur le bouton OK pour générer un événement OnClick. Commencez à entrer le code suivant :

if E

Delphi souligne alors en rouge ondulé le E, parce qu'il n'est pas reconnu comme identificateur déclaré. De même, il souligne le end car il s'attend à trouver le then correspondant au if.
De même, vous pourrez voir apparaître une nouvelle catégorie dans la fenêtre Structure, intitulée Erreurs et comportant les deux erreurs indiquées. En double-cliquant sur une erreur, le curseur vient se placer à l'endroit où cette erreur a été décelée.

Qui aurait pensé que Borland copierait sur le souligneur d'erreurs de grammaire de Word ? lol.

Déplacez le curseur de la souris jusque sur le mot TFormMain dans la déclaration de la variable FormMain. Une bulle d'aide très instructive apparaît :

Cette bulle montre diverses infos variant selon la nature de l'identificateur pointé.

Continuez à entrer le code jusqu'au point :

if EditFirstName.

Comme dans les dernières versions de Delphi, l'éditeur propose alors une fenêtre qui vous permet de choisir aisément parmi les propriétés/méthodes de l'objet EditFirstName.

Cependant, une apparaît pour chaque élément que vous choisissez.

Choisissez ici la propriété Text.

Terminez le code ci-dessous :

if EditFirstName.Text = '' then
begin
end;

Pour ceux qui auraient pris du retard dans les versions de Delphi, nous allons voir les suggestions de paramètres pour les routines/méthodes.

Dans le code dont on a parlé ci-dessus, ajoutez :

if EditFirstName.Text = '' then
begin
  MessageDlg(
end;

Delphi souligne le end en rouge, mais, plus important, il propose une bulle d'aide indiquant les divers paramètres attendus par la fonction MessageDlg.

Terminez le code ci-dessous :

if EditFirstName.Text = '' then
begin
  MessageDlg('Vous devez donner un prénom', mtError, [mbOK], 0);
  exit;
end;

Les Snippets de code sont des portions de code que Delphi enregistre et qui sont réutilisables à plusieurs endroits.

Nous allons transformer le bloc begin..end avec message d'erreur ci-dessus pour en faire un snippet de code.

Modifiez d'abord temporairement le message d'erreur pour être un peu plus générique :

begin
  MessageDlg('Écrivez ici le message d''erreur', mtError, [mbOK], 0);
  exit;
end;

Assurez-vous que vous pouvez voir la palette de composants. Puis sélectionnez les quatre lignes ci-dessus.
Maintenez la touche Alt enfoncée et glissez la sélection sur la palette des composants.

Sous la catégorie Snippets de code dans la palette des composants, vous pouvez voir une nouvelle entrée commençant par begin MessageDlg. C'est votre snippet de code.

Les snippets de code étant communs à tous vos projets, vous pourrez réutiliser ce code facilement dans toutes vos applications.

Replacez l'ancien message d'erreur, puis continuez le code ci-dessous :

if EditFirstName.Text = '' then
begin
  MessageDlg('Vous devez donner un prénom', mtError, [mbOK], 0);
  exit;
end;
if EditSurname.Text = '' then

Nous allons maintenant utiliser le snippet de code précédemment enregistré pour réaliser le bloc du then.

Si ce n'est pas déjà fait, déployez la catégorie Snippets de code de la palette des composants. Puis glissez le snippet que vous avez enregistré précédemment après le then dans le code.
Le code du snippet est ajouté automatiquement :

if EditSurname.Text = '' then
begin
  MessageDlg('Écrivez ici le message d''erreur', mtError, [mbOK], 0);
  exit;
end;

Modifiez alors le message d'erreur.

Le langage Delphi a été étendu pour inclure les caractères Unicode alphanumériques et alphabétiques dans les identificateurs.

Vous pouvez maintenant choisir comment Delphi codera vos fichiers source. Les options incluent la norme ANSI, binaire, l'UTF8, etc.
Pour spécifier dans l'éditeur le type de codage du fichier source courant, faites un clic droit et choisissez le codage que vous voulez employer.

Pouvoir choisir le codage des fichiers source est particulièrement utile quand vous écrivez des fichiers source à destination d'autres pays.

Par exemple, les fichiers source codés en utilisant UTF-8 maintiendront correctement l'identité des différents caractères même lorsqu'ils sont ouverts avec une localisation différente. Par comparaison, les caractères spéciaux dans un fichier source peuvent changer si le fichier source est codé dans la norme ANSI puis ouvert avec un codepage différent de la norme ANSI.

Nous allons donc continuer notre code et utiliser une variable nommée Données.

procedure TFormMain.ButtonOKClick(Sender: TObject);
var Données : string;
begin
  if EditFirstName.Text = '' then
  begin
    MessageDlg('Vous devez donner un prénom', mtError, [mbOK], 0);
    exit;
  end;
  if EditSurname.Text = '' then
  begin
    MessageDlg('Vous devez donner un nom de famille', mtError, [mbOK], 0);
    exit;
  end;
  Données := EditFirstName.Text+';'+EditSurname.Text;
  if EditNickName.Text <> '' then
    Données := Données+';'+EditNickName.Text;
  MessageDlg('Données correctes :'+#10+Données, mtInformation, [mbOK], 0);
  Close;
end;

Ajoutez un événement OnClick au bouton Annuler et complétez son code comme suit :

procedure TFormMain.ButtonCancelClick(Sender: TObject);
begin
  Close;
end;

Après avoir rédigé ces quelques lignes de code, vous vous dites que Données n'est pas un nom de variable très explicite et vous voudriez le changer. Avec les anciennes versions de Delphi, vous deviez modifier une à une toutes les occurrences de Données dans la procédure. Avec Delphi 2005, il y a une nouvelle méthode plus simple.

Sélectionnez l'intégralité du code de la procédure, puis cliquez sur le petit bouton qui est apparu dans la gouttière et intitulé Mode Synchronisation des modifications.

Le texte sélectionné prend un fond bleu clair. Sélectionnez alors un des mots Données, les autres s'encadrent. Saisissez un nouveau nom pour cette variable, par exemple StrInfos : toutes les autres instances du mot Données sont modifiées en même temps.

Enregistrez ce projet et exécutez-le (toujours F9). Vous avez réalisé votre première application avec Delphi 2005 !

Maintenant vous aimeriez ajouter un champ Numéro de téléphone.

Récupérez donc la fiche et modifiez-la comme suit :

Modifiez le code de l'événement OnClick du bouton OK comme suit :

procedure TFormMain.ButtonOKClick(Sender: TObject);
var StrInfos : string;
begin
  if EditFirstName.Text = '' then
  begin
    MessageDlg('Vous devez donner un prénom', mtError, [mbOK], 0);
    exit;
  end;
  if EditSurname.Text = '' then
  begin
    MessageDlg('Vous devez donner un nom de famille', mtError, [mbOK], 0);
    exit;
  end;
  StrInfos := EditFirstName.Text+';'+EditSurname.Text;
  if EditNickName.Text <> '' then
    StrInfos := StrInfos+';'+EditNickName.Text;
  if EditPhoneNumber.Text <> '' then
  begin
    if EditNickName.Text = '' then StrInfos := StrInfos+';';
    StrInfos := StrInfos+';'+EditPhoneNumber.Text;
  end;
  MessageDlg('Données correctes :'+#10+StrInfos, mtInformation, [mbOK], 0);
  Close;
end;

Enregistrez votre projet et exécutez-le. Le nouveau champ est opérationnel.

Tout compte fait, vous n'aimez pas ce champ et voulez le supprimer. Avec les anciennes versions de Delphi, vous deviez repérer tous les endroits où intervenait ce champ et les supprimer. Avec cette nouvelle version, l'historique va beaucoup nous aider.

Cliquez donc sur l'onglet Historique. Trois sous-onglets sont disponibles, en bas à gauche : Contenu, Info et Diff (pour Différences).

Dans le sous-onglet Contenu, vous pouvez consulter le contenu de chaque sauvegarde historique de votre fichier.

Dans le sous-onglet Info, vous pouvez consulter quelques infos sur chaque sauvegarde, mais aussi éditer un commentaire pour chaque. Ce peut être fort utile pour repérer les sauvegardes stables par exemple.

Dans le sous-onglet Diff, vous pouvez consulter les différences entre deux sauvegardes ou entre le fichier actuel et une sauvegarde.

Par défaut, Delphi gère un historique des 10 derniers enregistrements. Cette limite peut être augmentée jusqu'à 90 sauvegardes.

Pour modifier la limite des sauvegardes de l'historique, utilisez le menu Outils|Options, puis Options de l'éditeur. Modifiez alors la valeur de la zone Limite sauv. fichiers.

Étudions les différences entre le fichier actuel et la dernière sauvegarde. Sélectionnez pour ce faire Fichier à gauche et ~1~ (le numéro le plus haut qui existe). Vous pouvez alors constater dans la fenêtre de code du bas que certaines lignes sont surlignées en bleu clair avec un + devant (parfois il pourra il y avoir un -) :

Nous allons maintenant utiliser la fonctionnalité la plus intéressante de l'historique, à savoir la restauration.

Retournez sous l'onglet Contenu ou Info. Sélectionnez la sauvegarde que nous venons de comparer avec le fichier actuel et cliquez sur le bouton Restaurer la révision précédente. Retournez dans le code et en conception : les modifications apportées pour le numéro de téléphone ont disparu.

On peut remarquer deux différences majeures par rapport à une application Win32.

La première chose qui frappe est le gestionnaire de projets, qui contient beaucoup plus de dossiers et fichiers que pour un programme Win32. Vous n'aurez cependant pas à vous en soucier.

La deuxième est le source du programme (extension .bdsproj) qui a l'air bien plus compliqué que les sources des programmes VCL. N'ayez crainte, Delphi se charge, comme d'habitude, de ce fichier lui-même.

Une troisième minuscule différence : on utilise des fichiers .nfm (.NET Form) au lieu de .dfm (Delphi Form).

Donc, pour la majorité de vos programmes, vous ne remarquerez même pas que vous faites du .NET !

Réalisez la même application que tout à l'heure. Vous remarquerez que rien ne change dans votre démarche et qu'aucun problème ne se présente.

Vous pouvez enregistrer et compiler votre projet. Vous avez réalisé une application .NET aussi facilement qu'une application Win32 grâce à Delphi 2005 !

Je commence par SynEdit car Nono40 vous offre un excellent tutoriel pour l'installer sous Delphi 2005 :
Installer SynEdit dans Delphi 2005

Comme on ne peut rien ajouter à ce brillant tutoriel, passons tout de suite à la JVCL.

Je base cette partie sur la version 1.94 de la JCL et la version 3.0.0.1 de la JVCL. Cette dernière version peut être téléchargée depuis la page JCL de SourceForge et celle de la JVCL.

Pour pouvoir installer les productions Jedi dans Delphi 2005, vous devez posséder une édition complète (donc pas d'évaluation) de Delphi 2005.

Jedi propose un installateur très bien fait pour l'installation de ses librairies.
Après avoir décompressé la JCL et la JVCL dans deux répertoires distincts, ouvrez celui de la JCL, lancer Install.bat, et suivez les indications.

Vous ne devriez pas rencontrer de problème lors de l'installation de la JCL. Une fois ceci fait, lancez le batch Install.bat situé dans le répertoire de la JVCL pour installer la JVCL.

Ouvrez le package SJRDUnits.dpk et convertissez-le au format Win32. Supprimez toute la partie requires du package. Enregistrez.

Lors de la compilation, ajoutez tous les packages que Delphi vous propose d'ajouter. Une fois compilé, installez le package.

Ouvrez ensuite le package SJRDCompsR.dpk, que vous convertissez également au format Win32. De même, supprimez toute la partie requires. Puis, ajoutez à cette partie le package SJRDUnits.dcp. Faites de même pour la compilation que pour SJRDUnits.

Finalement, répétez la marche à suivre pour SJRDCompsD.dpk. Une fois installé, vous pourrez utiliser les composants SJRDComponents.