Messages des blogs récents

I. Introduction

Dans une agence de location de véhicules on souhaite connaître leur disponibilité dans le futur en fonction des locations déjà planifiées.

L'objectif de ce billet est en fait de générer la liste des disponibilités des véhicules à partir de données enregistrées dans un fichier Excel ou dans des tables SQLite.

Cette opération sera réalisée en 3 étapes principales :

1. importation

...

Préambule
Contrairement à un contrôle MultiPage, un TabStrip n'a pas ses propres contrôles. Sa gestion est donc relativement simple.
Dans ce billet qui en précède d'autres sur le même sujet, je présente une fonction générique qui crée dynamiquement des onglets et j'évoquerai quelques propriétés telles que la taille des onglets (Tab)

Editeur VBE vs VBA

Nombre d'onglets : Lorsque l'on insère un objet TabStrip dans un UserForm, il y a deux onglets par défaut

...

Préambule
Il arrive régulièrement que nous devions utiliser une liste de valeurs uniques au sein d'une plage de données.
Il y a évidemment de nombreuses méthodes pour y arriver. J'en ai choisi deux. La première utilise la fonction Evaluate en y incluant comme argument, la fonction native d'excel UNIQUE (uniquement pour la version 365) et la seconde utilise l'objet Dictionary.
Chacune d'elles est présentée au sein d'une fonction générique.

...

Pour ce tutoriel, je vais vous montrer comment déplacer un objet de type contrôle pendant l'exécution d'un programme en Delphi. Le truc est très simple et n'importe quel développeur Delphi peut le faire.




Quels sont nos besoins ?

Nous devrions savoir comment nous voulons déplacer un contrôle. Nous avons plusieurs façons de déplacer un objet de contrôle. Nous pouvons utiliser les touches du clavier (Haut, Bas, Gauche ...

Pour Aggicher le menu Aide à la droite de la barre de menu

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
// a placer dans la procedure FormCreate
 MENUITEMINFOA mii;
   HMENU  MainMenu=MainMenu1->Handle;
   char Buffer[80]={};
   mii.cbSize = sizeof(mii) ;
	mii.fMask = MIIM_TYPE;
	mii.dwTypeData = Buffer;
	mii.cch = sizeof(Buffer) ;
	GetMenuItemInfoA(MainMenu, Help1->Command, FALSE, &mii) ;

	//SET Help Menu Item Info
	mii.fType = mii.fType

...