Discussion :

[tleboukaka]

Slt à tous !

J’ai sur mon disque dur des photos de plusieurs ELEVES scannées au format JPG
Rappel : le format JPG étant plus léger que le format BMP…

Je voudrai placer chaque PHOTO de chaque Elève sur la fiche, dans une zone.
Ensuite quand j’aurai besoin de naviguer/défiler entre les différents enregistrements, que chaque enregistrement puisse m’afficher la photo y correspondant.
Pour charger une photo quelconque, je clique sur un bouton qui ouvre une boite de dialogue « Sélectionner un fichier ».
Notez bien l’utilisation de TDBNavigator dans mon cas.

Mon problème est que je ne suis pas capable de réaliser cela.

Merci d’avance pour tous les détails possibles que vous pourrer énumérer dans vos tentatives de réponse…

Voici les composants que j’ai utilisés en NOMMANT leurs noms :


TADODataSet = dtsEleve = la TABLE Elève (sql server 2000)
ElvPhoto = un CHAMPS de dtsEleve
TBlobField = dtsEleveElvPhoto

TImage = ImgElvPhoto
C’est dans cette ZONE (un CADRE) que devra s’afficher chaque photo JPG

TbitBtn = bbtChargerElvPhoto
Le clic sur ce BOUTON doit ouvrir une boite de dialogue pour sélectionner une photo JPG

TDBNavigator = dnvElv
Pour me permettre de naviguer entre différents enregistrements (ajouter, supprimer, éditer, etc)


A bientôt

[Just-Soft]

Salut,

Je crois que le sujet a été évoqué, ici même, plusieurs fois. Ce lien par exemple.

[tleboukaka]

slt

J'ai suivi le lien dont le contenu est ci-dessous affiché

Code :

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

1
2
3
4
5
6
7
8
procedure TForm1.Query1AfterScroll(DataSet:TDataSet);
begin
  if Dataset.RecNo >= 0 then
    if Dataset.FieldByName('CheminFichierImage').AsString <> '' then
      Image1.Picture.LoadFromFile(Dataset.FieldByName('CheminFichierImage').AsString)
    else
      Image1.Picture := nil;
end;

Cependant, j'avoue avoir du mal à l'adapter à mon besoin

Notez bien l’utilisation de TDBNavigator dans mon cas.
Car quand je défile sur un autre enregistrement il faudrai bien que l'image ou la photo précédente passe pour faire place à la suivante.
Il faudrait bien que chaque elève s'affiche avec sa photo...
c'est dynamique et non statique.

Merci d'avance de me guider

Eric

[evarisnea]

le code que tu cite est celui de l'évènement OnAfterScroll du dataset. dans le code exemple il s'agit d'un TQuery, or toi tu utilises un TADODataset. tu dois créer un gestionnaire pour l'évènement OnAfterScroll de ton TADODataset à l'aide de l'inspecteur d'objet, et écrire le code correspondant dans celui-ci.

[tleboukaka]

slt Evarisnea

J'ai du mal à m'en sortir
Est ce que vous pouvez prendre un peu de temps à me décrire ce code dans les détails !

Merci d'avance

@+