Discussion :

[yashiro41281]

(Delphi7 Paradox)
lorsque je veut acceder a un enregistrement par exemple
ma table est "Infos"
elle contient "Societe,Entete,Adresse,MF,RC,Adresse,LOGO..."
sachant que logo est un BLOB graphique
lorsque je veut lui affecter un une image
avec un "openpicturedialog"
normalement voici le code que je doit taper:

Begin
if OpenPictureDialog.Execute then
data.InfosLOGO.LoadFromFile(OpenPictureDialog.FileName);
End;

il suffit que je tape "data.infosLOGO" il m'affiche

[Pascal Erreur] Unit4.pas(1): Impossible d'invoquer l'achèvement de code, du fait d'erreurs dans le code source

qu'est ce que je doit faire

[philnext]

Ben déjà montrer ton source...sinon, là, sans boule de cristal...

[yashiro41281]

voici la source

[gduo200]

J'ai téléchargé ton application. Arrives-tu au moins à la compiler ?

Pour ma part j'obtiens une erreur à la ligne suivante :

Ligne :

Code :

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

data.InfosLOGO.LoadFromFile(OpenPicture.FileName);

Message d'erreur :

Code :

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

[Erreur] Unit4.pas(52): Identificateur non déclaré : 'InfosLOGO'

Dans l'archive que tu as envoyé il n'y a aucune déclaration pour InfosLOGO.

Ce qui expliquerait ton message d'erreur pendant la saisie du code

Code :

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

[Pascal Erreur] Unit4.pas(1): Impossible d'invoquer l'achèvement de code, du fait d'erreurs dans le code source

[yashiro41281]

je n'arrive pas a le compiler
normalement ya pas de declaration pour InfosLOGO.
je l'ai vu dans plusieures sources

pour ne citer qu'un exemple
voici un calpin qui démontre qu'il n'ya pas de déclaraztion pour les noms de tables et les champs

[TryExceptEnd]

Si ta table "infos" est bien déclaré, ton champs blob "LOGO" aussi;
l'identificateur "infosLOGO" est tout a fait inconnu pour Delphi.
la solution est simple : "infos.findfield('LOGO')", ainsi Delphi retrouveras ses petits.

[Cl@udius]

Salut

Code :

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

1
2
 
  data.InfosLOGO.LoadFromFile(OpenPictureDialog.FileName);

InfosLogo dans le cas présent représente un champ persistant.
Dans ton projet, et plus particulièrement dans ton DataModule, tu n'as pas défini de champs persistants pour tes tables.
Tu ne peux donc accéder à tes champs de cette façon.

Donc ou bien tu définis des champs persistants pour tes tables, ou bien tu y accède explicitement ainsi:

Code :

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

1
2
 
  data.Infos.FieldByName('LOGO').LoadFromFile(OpenPictureDialog.FileName);

@+ Claudius

[gduo200]

En cherchant tu trouveras dans le forum des topics sur la meilleur manière de charger des images dans une table. Je ne me suis pas vraiment interessé au sujet.

Si je répond quand même c'est pour te dire qu'il y a une erreur dans ton code.
Le champ LOGO n'est pas un champ persistant tu ne peux donc pas l'utiliser sous la forme

Code :

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

InfosLOGO

C'est :

Code :

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

Infos['LOGO']

Ou

Code :

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

Infos.FieldByName('LOGO')

[Cl@udius]

Re,

Envoyé Par MP:

encore une petite info
comment je fait pour définir des champs persistants pour mes tables.
merci d'avance

Tu fais un double-clic sur ta table, apparait l'éditeur de champ. Puis clic-droit sur l'éditeur, Ajouter tous les champs (ou Ctrl-F).

Tu disposes maintenant de champs persistants, auxquels tu peux accéder par exemple pour le champ LOGO de la table Infos par Data.InfosLOGO.

Voilou.

@+ Claudius

[yashiro41281]

Merci infiniment Claudius
bonne continuation