En utilisant la fonction FormatFloat
// Exemple :
ShowMessage(FormatFloat('00', 5));
// affichera '05'
Type: Messages; Utilisateur: Ctrl+F2
En utilisant la fonction FormatFloat
// Exemple :
ShowMessage(FormatFloat('00', 5));
// affichera '05'
Voici une version améliorée qui complète la réponse de Sébastien et corrige une erreur d'index :
procedure ExtrairePhrases3(RichEdit : TRichEdit );
var
Texte, phrase, caractere: string;...
...
procedure ExtrairePhrases2(RichEdit : TRichEdit );
var
Texte, phrase, caractere: string;
i, LongueurTexte: integer;
separateurs: string;
begin
phrase := '';
Il y a la fonction RenameFile. Il n'y a qu'à lui passer l'actuel et le futur nom du répertoire.
Si les chemins d'accès diffèrent, le répertoire sera déplacé vers sa nouvelle destination.
Ex.: ...
Bonjour gimlithedwarf,
voici comment j'ai procédé pour afficher/modifier/raffraîchir une image.
Ça ne fait que dessiner selon la position du curseur de la souris, mais le
scroll s'effectue...
Si tu as un Edit dans lequel tu veux inscrire l'adresse de la page courante,
tu utilises l'événement approprié pour détecter le changement de page,
tu récupères son paramètre URL (qui te donne...
Tout dépendant des cas et de la manière dont tu veux les traiter,
tu peux utiliser les événements suivants et leur paramètre URL:
OnBeforeNavigate2
OnNavigateComplete2
...
Bonjour Delph,
voici ma suggestion et quelques remarques.
// departement contiendra une ligne du fichier texte dont chaque
// élément est séparé de son voisin par une tabulation (#9) ???...
Dans bien des cas, il est possible de trouver l'unité à inclure en consultant la partie
Header file dans le Quick Info associé à la fonction ou la constante recherchée.
Pour ce qui est de...
Voici une solution à modifier selon tes besoins
1) Associer à l'événement OnShowHint une nouvelle procédure
procedure TForm1.FormCreate(Sender: TObject);
begin
Application.HintShortPause :=...
Tu pourrais mettre dans la section initialization de
l'unité contenant la fiche principale
Application.ShowMainForm := False;
Pour ta première question, il est possible de passer par le registre.
Voici une petite procédure que tu peux ajuster selon tes besoins.
procedure ChangeHiddenFilesOptions;
const
...
Pour ta deuxième question, voici ce que tu peux faire
DirName := 'c:\TonRepertoire';
DirAttr := FileGetAttr(DirName); // Le statut du répertoire se retrouve dans DirAttr
// Si...
Vous avez un bloqueur de publicités installé.
Le Club Developpez.com n'affiche que des publicités IT, discrètes et non intrusives.
Afin que nous puissions continuer à vous fournir gratuitement du contenu de qualité, merci de nous soutenir en désactivant votre bloqueur de publicités sur Developpez.com.