Exemples pour coder avec Delphi, page 20

Compléter automatiquement une ligne dans une Combobox

var LastKey:Word;... procedure TForm1.ComboBox1KeyDown(Sender: TObject; var Key: Word;Sh if t: TSh if tState); begin LastKey:=Key; end; procedure TForm1.ComboBox1Change(Sender: TObject);Var ...
Delphi - Trucs et astuces - Objet le 26/05/2003 vu 1242 fois SwissDelphiCenter

Transmettre des propriétés d'un control vers un autre

uses TypInfo; function CloneProperty(SourceComp, TargetComp: TObject; Properties: array of string): Boolean; var i: Integer; begin Result := True; try for i := Low(Properties) to...
Delphi - Trucs et astuces - Objet le 11/05/2003 vu 1795 fois Kingron - Kingron#163.net

Inclure/utiliser un curseur animé dans votre application

Fichier Exemple.rcAnim RCDATA "Globe.ani"Compiler avec BRCC32.exeDans le projet Delphi...implementation{$R *.DFM}{$R exemple.RES} procedure TForm1.Button1Click(Sender: TObject); var Res:...
Delphi - Trucs et astuces - Autre categorie le 20/01/2003 vu 6760 fois Communauté Delphi

KeusKiFo

Permet de copier les fichiers les plus récents d'un endroit (disque, CDRom, répertoire,etc...) vers un autre.Le projet est en Delphi 6 et j'utilise un composant TScruteDossier (dont je...
Delphi - Grenier - Fichier le 16/01/2003 vu 1265 fois Eric Vanden Bussche

Pack de Bitmap

635 bitmap qui pourront ętre insérés dans un menu par exemple.
Delphi - Grenier - Glyphs et icones le 04/01/2003 vu 1926 fois ???

EuroFranc

Le célèbre EuroFranc est porté sous Linux par Kylix interposé.Ne vous amusez donc pas à essayer de l'exécuter sous Windows, il n'y a pas de fichier .exe :-)
Delphi - Grenier - Kylix le 01/01/2003 vu 1000 fois Jean Jamet

Afficher un Hint différent selon les cellules d'un StringGrid

//ne pas oublier de mettre ShowHint=true dans l'inspecteur d'objet var Form1: TForm1; OldHintCol, OldHintRow:integer;implementation{$R *.DFM} procedure TForm1.StringGrid1MouseMove(Sender:...
Delphi - Trucs et astuces - Objet le 08/12/2002 vu 1313 fois Communauté Delphi

Différencier les 3 bouttons de la souris

procedure TForm1.Panel1MouseDown(Sender: TObject; Button: TMouseButton; Sh if t: TSh if tState; X, Y: Integer); begin if Button = mbRight then Showmessage('Click droit') else If...
Delphi - Trucs et astuces - Autre categorie le 08/12/2002 vu 808 fois Communauté Delphi

Fichier déplace

Déplacer ou copier des fichiers d'un répertoire vers un autre suivant l'extension desfichiers.Exemple : *.bmp, copie l'ensemble des images bmp.
Delphi - Grenier - Fichier le 05/12/2002 vu 1152 fois ExoticSoftware

Redimensionner et déplacer objet à l'execution

1. Déplacer des objets à l'écran à l'aide de la souris.2. Redimensionner des objets à l'execution. Par exemple, donner une nouvelle taille à une image.
Delphi - Grenier - Objet le 05/12/2002 vu 1332 fois ExoticSoftware
Navigation
Recevoir la newsletter
Pour s'inscrire à notre newsletter, veuillez indiquer votre adresse email ci-dessous:

Newsletter déjà parues