Discussion :

[mtournay]

Je suis bien avancé dans mon projet, j'affiche toutes les données souhaitées à dans ma fenêtre avec, on l'a vu dans un autre thread, les accents recodé à la volée.

J'en suis donc maintenant à insérer des données dans la base access et là patatra, erreur de lecture seule ....

J'ai essayé pas mal de choses, rajoutés readonly=false dans les paramètres, rien n'y fait

l'un de vous a-t-il déjà eu des soucis de ce type ?

[Jazz77]

Bonsoir,

Je crois que j'ai un début de solution.

Pour tester j'ai poser un bouton et je l'ai renommé ButtonAjouter
le code donne cela.
Apparemment cela fonctionne.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
 
procedure TFormMain.ButtonAjouterClick(Sender: TObject);
begin
  With DataSource1 do begin
    DataSet.Append;
    SqlQuery1.FieldByName('Libelle').AsString:= 'Western Digital SDD';
    SqlQuery1.FieldByName('Adresse').AsString:= 'Rue du commerce';
    SqlQuery1.FieldByName('Compte').AsString:= '100001';
    DataSet.Post;
    SqlQuery1.ApplyUpdates
  end;
end;

Le plus amusant depuis que j'ai testé le code ci dessus... le débogeur ne plante pas (pour l'instant)

Si cela peut t'aider

Jazz

[mtournay]

ça passe pas le append

Tu passe par un filedsn ou par une source de données utilisateur/système ?

Il faudrait peut-être que je l'ouvre avec un vrai access pour paramétrer certaines choses dans le fichier non ?

[Jazz77]

ça passe pas le append

Tu passe par un filedsn ou par une source de données utilisateur/système ?

Je passe par un filedsn.

as tu défini les champs dans ton SQLQuery ?

Je pense que le problème de débogueur qui plante à la fin de l'application vient
de la configuration de sqlquery

Il faudrait peut-être que je l'ouvre avec un vrai access pour paramétrer certaines choses dans le fichier non ?

J'ai utilisé ACCESS pour enlever tous les accents dans le nommage des champs.

[Jazz77]

dans mon filedsn j'ai cela

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
[ODBC]
DRIVER=Microsoft Access Driver (*.mdb)
UID=admin
UserCommitSync=Yes
Threads=3
SafeTransactions=0
PageTimeout=5
MaxScanRows=8
MaxBufferSize=2048
FIL=MS Access
DriverId=25
DefaultDir=C:\Lazarus\PROJETS\ACCESS2\
DBQ=compta.mdb

[mtournay]

Hello

Il semble que mon problème soit liée a une table et non pas à tout le fichier, j'arrive à ajouter des éléments dans d'autres tables. Je continue mes test et mes recherches