Trucs et astuces
Rechercher

Auteurs recents
Trucs et astuces - articles les plus recentsTrucs et astuces - articles les plus recents
avatar

Obtenir un nom de fichier unique

function GetUniqueFileName(const AFileName, AExt: string): string; var iNum: integer; sFileName: string; beginif FileExists(AFileName + AExt) then begin iNum := 1; sFileName := AFileName +...

Delphi - Trucs et astuces - Fichier le 28/04/2009 vu 523 fois
avatar

Obtenir le nom de l'utilisateur connecté à une base de données

function TDM.GetLoggedUserName: string; var IBQuery: TIBQuery; begin result := ''; IBQuery := TIBQuery.Create(nil); try with IBQuery do begin Database := IBDB; ...

Delphi - Trucs et astuces - Base de donnees le 28/04/2009 vu 1581 fois
avatar

Extraire les adresses email d'un fichier *.dbx d'outlook

unit ExtractEmailsFunc;interface uses Windows, SysUtils; procedure CheckEMail(FilePath: string);implementation var BufferSize: Integer; function Ver if yFile(strFileName: string): Integer; var ...

Delphi - Trucs et astuces - Internet le 28/04/2009 vu 1394 fois
avatar

Webbrowser : tout sélectionner puis copier dans le presse-papier

uses ActiveX; procedure TForm1.Button1Click(Sender: TObject); begin webbrowser1.navigate('http://fobec.com'); end; procedure TForm1.Button2Click(Sender: TObject); var vInput,...

Delphi - Trucs et astuces - Internet le 28/04/2009 vu 1003 fois
avatar

Arreter Windows - Boite de dialogue

o_winDialogShutDown provoque l'affichage de la boîte dialogue de fermeture Windows.!!! Pas de gestion de la boîte de dialogue: celle-ci envoie un message de fermeture à toutes les applications...

Delphi - Trucs et astuces - Systeme le 27/03/2009 vu 793 fois
avatar

Décrypter la date de modification des Favoris

Des malades chez Microsoft !!!!Découper et retourner la chaîne contenant la date puis mouliner avec FileTimeToSystemTimeVoir code joint

Delphi - Trucs et astuces - Internet le 27/03/2009 vu 1142 fois
avatar

Combobox - StringGrid : supprimer la couleur de focalisation

Pour un ComboBox :propriété style : csOwnerDrawFixed procedure TForm1.ComboBox1DrawItem(Control: TWinControl; Index: Integer; Rect: TRect; State: TOwnerDrawState); begin // Supprimer couleur...

Delphi - Trucs et astuces - Objet le 27/03/2009 vu 1299 fois
avatar

Compter les mots d'une chaine

function o_WordsCount( const _Texte: string ): Integer; const sep: set of char = ' ' , '.', ':', ';', '"', '!', '?', ',',...

Delphi - Trucs et astuces - Autre le 27/03/2009 vu 836 fois
avatar

Retrouver les dossiers de Windows

o_GetPathWinFolders renvoie le chemin de certains dossiers utilisés par Windows.Syntaxe function o_GetPathWinFolders( _iddossier: integer ): string;Paramètres_iddossier: integer : peut avoir une des...

Delphi - Trucs et astuces - Systeme le 14/03/2009 vu 843 fois
avatar

Calcul de charge sur accusNi-Cad

Ce programme calcul la résistance de charge, le transistor PNP, la tension d'alim MIN et MAX pour un nombre d'accus donné.lE pcb est disponnible sur le site Kicad dans la rubrique librairies.

Delphi - Trucs et astuces - Autre le 23/02/2009 vu 225 fois