application ado delphi

Version imprimable

13/03/2012, 14h12
momedalhouma

application ado delphi

salut je cherche a faire une application se connectant a une base de donne acces ou sql.
pour sql ça fonctionne pas j'ai ce problème dans le composant tquery
http://i.imgur.com/m5V72.png
et l'autre problème c'est que je veaux dans ma table un champ image et quand je clique dans l'enregistrement le programme m'affiche la photo de la personne quelque part

Voilà un exemple

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 
  object ADOConnection1: TADOConnection
    ConnectionString =
      'Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security In' +
      'fo=False;Initial Catalog=MaBase;Data Source=MonPoste'
    Provider = 'SQLOLEDB.1'
    Left = 112
    Top = 72
  end
  object ADOQuery1: TADOQuery
    Connection = ADOConnection1
    Parameters = <>
    Left = 160
    Top = 72
  end

13/03/2012, 14h45
ShaiLeTroll

logique tu poses un TQuery du BDE au lieu d'un TADOQuery de ADO :roll:

Pour la seconde question, utilise un TDBImage connecté sur un TDataSource
voir aussi Comment insérer et récupérer un fichier dans un champ de type BLOB ?
13/03/2012, 15h28
momedalhouma
merci pour les réponses .
ShaiLeTroll

la je sais pas qu'est ce que je dois remplacer:j'ai l’erreur que le paramétré pnom non trouvée
Code:

1 2 SQL.Add('insert into MaTable(Nom,Fichier)'); SQL.Add('Values(:PNom,:PFichier)');
13/03/2012, 16h04
ShaiLeTroll

As tu fais les ParamByName avant le ExecSQL ?

Quel tutoriel utilises-tu pour te former à ADO ? Est-ce un de developpez ?

comme mon application est assez simple j'ai pensé que je dois pas voire tout un tuto puisque j'ai juste deux jours pour faire cette application pour un ami
pour résumer ce que je cherche voila une photo
http://i.imgur.com/7yodg.png

j'ai une base de donné de 100 personne et pour chaque personne j'ai sa photo .
et mon programme doit me permettre en cliquant sur un enregistrement de voir sa photo,de pouvoir ajouter une personne avec une nouvelle photo que je dois charger.et pourquoi pas un autre champ nom a coté de l'image qui me permettra da cherche dans la base de donné c'est tout ce je cherche. j'utilise access et delphi xe2.
ce que tu m'a proposé est assez difficile a comprendre pourriez vous me faire un petit exemple .
pour le tuto si vous savez un qui pourra être utile pour les opérations que je cherche ça me fera du bien

dans l'image que j'ai mis il existe bien un champ photo mais il est caché a droite

voila le bout de code pour inserer dans la base de donnés:
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 procedure TForm1.Button1Click(Sender: TObject); var Img : TBitmap; begin if OpenDialog1.execute then try img := TBitmap.Create; img.LoadFromFile(OpenDialog1.FileName); With AdoQuery1 do begin Close; SQL.Clear; SQL.Add('insert into table1(nom,photo)'); SQL.Add('Values(:PNom,:PFichier)'); ParamCheck := True; Parameters.ParamByName('PNom').Value := ExtractFileName(OpenDialog1.Filename); Parameters.ParamByName('PFichier').Assign(Img); try ExecSQL; Except on E:Exception do begin Showmessage('Erreur lors de l''insertion de l''image dans la base de données : ' + E.Message); end; end; end; finally img.free; end; end;

13/03/2012, 16h58
ShaiLeTroll

Tu aurais du suivre le tutoriel "REPOUSSER LES LIMITES DES FORMULAIRES EN MODE CONTINU"

Un Trombinoscope ça peut se coder directement en Macro ACCESS !

Sinon c'est la célèbre Démo Fish Facts

voir l'autre FAQ : Comment lire directement l'image dans la base et l'afficher dans un TDBGrid ?

as-tu mis le bon DataSource entre pour le TDBImage, le TDBGrid et le TDBNavigator ?
Combien de table ? juste table1 ?
Etrange, dans ton code table1.nom contient un nom de fichier, et dans ton ScreenShot (encombrant) nom contient un nom de personne, donc une autre table ?
comment procède tu pour la jointure SQL ?
13/03/2012, 17h09
momedalhouma

as-tu mis le bon DataSource entre pour le TDBImage, le TDBGrid et le TDBNavigator ? oui c le bon.
Combien de table ? oui une seul table ou j'ai 5 champ (id,nom,description,tel,photo)
Etrange, dans ton code table1.nom contient un nom de fichier, et dans ton ScreenShot (encombrant) nom contient un nom de personne, donc une autre table ? là je sais pas j'ai essayé de faire comme l'exemple dans la fac de delphi
comment procède tu pour la jointure SQL ? une seul table
13/03/2012, 17h21
ShaiLeTroll

utilise [ QUOTE] pour citer une réponse d'un autre membre, tu as même un bouton pour cela !

photo est bien un champ BLOB ?
13/03/2012, 17h22
momedalhouma

oui la photo est un champ blob