8 conseils pour Delphi :
1. Comment appeler un fichier exe externe dans Delphi ?
utilise WinProcs ;
.
commencer
WinExec(......);
.
fin.
Ce n'est pas différent de l'appel des fonctions de la bibliothèque Pascal.
2. Comment changer la police et la couleur de l'indice Delphi
Les propriétés de TApplication dans Delphi incluent HintColor et HintPause.
Vous pouvez changer la couleur de Hint dans l'application en définissant HintColor et en définissant HintPause
Modifiez l'heure à laquelle l'indice est déclenché.
Mais malheureusement : la police de Hint dans Delphi ne peut pas être modifiée.
3. Comment calculer la date dans Delphi
Le calcul du temps est le plus simple dans Delphi, comme suit :
var ss : TDateTime
En fait, Tdatetime est un nombre à virgule flottante double précision, et sa virgule décimale représente le nombre de jours :
Par exemple, ss := ss + 20 signifie 20 jours à partir de ss, si ss = 234,567
Cela signifie 234,567 jours, à partir de 0 après JC bien sûr !
4. Comment programmer ScreenSaver en utilisant Delphi (null)
L'économiseur d'écran n'est rien de plus qu'un programme exécutable dont l'extension est modifiée en .SCR. Il accepte deux paramètres de ligne de commande :
-s paramètres de commande d'exécution
-c configurer les paramètres de la commande
Windows démarre un programme en envoyant le paramètre de ligne de commande -s au programme.
Il convient de noter que : la fenêtre du programme n'a pas de bordures ni de titres ; la taille de la fenêtre doit être la même que la taille de l'écran ;
Gestion des événements de fenêtre.
5. Comment changer le nom d'un répertoire dans Delphi
Appelez la fonction RenameFile, par exemple :
RenameFile('c:/wang/temp', 'c:/wang/tmp');
6. DELPHI affiche les fichiers image JPEG
Ajoutez simplement JPEG aux utilisations
Il existe une classe TJPEGImage dans l'unité JPEG, qui peut définir une variable telle que Jpeg et l'appeler avec LoadFromFile.
Importez un fichier JPEG, puis utilisez Canvas.Draw(x,y,Jpeg) de Form pour l'afficher.
7. Traitement des fichiers au format Jpeg dans Delphi...
(1). Ajouter une unité JPEG aux utilisations ;
(2). Définissez une variable globale, telle que var AJPEG : TJPEGImage ;
(3). Ajoutez : dans l'événement OnCreate du formulaire :
Canvas.Pen.Color:=clBlack;
Canvas.Pen.Style:=psSolid;
Canvas.Brush.color:=clBtnFace;
Canvas.Brush.Style:=bsSolid; // Ceci permet de définir certaines propriétés de Canvas pour plus de commodité.
//Effacer le formulaire et charger un nouveau fichier JPEG ;
AJpeg:=TJpegImage.Create;//Générer dynamiquement AJpeg;
AJpeg.LoadFromFile('D:/Temp.jpg') //Après avoir généré AJpeg, chargez le fichier JPEG ;
(4) .Ajoutez l’événement OnPain du formulaire
Canvas.Rectangle(2,2,560,430); //Dessine un rectangle noir pour entourer l'image ;
x :=10 ; y :=10 ;
Form1.Canvas.Draw(x,y,AJpeg); //Sortie du fichier JPEG avec (x,y) comme coin supérieur gauche ;
//En fait, sa fonction est de restaurer les graphiques lorsque ceux-ci sont détruits ;
(5). Ajoutez ce qui suit à l'événement OnClick du bouton « Charger » ou « Parcourir » :
commencer
si OpenPictureDialog1.Execute alors
commencer
AJpeg.Free; // Libérer l'ancien AJpeg ;
AJpeg:=TJpegImage.Create; //Générer un nouvel AJpeg ;
AJpeg.LoadFromFile(OpenPictureDialog1.Filename); //Charger le fichier JPEG ;
fin;
Canvas.Rectangle(2,2,560,430); //Formulaire clair ;
x:=10 ;
y :=10 ;
Form1.Canvas.Draw(x,y,AJpeg); //Afficher le nouveau AJpeg;
fin;
8. Écran de démarrage DELPHI3