Valeur Boolean depuis Sqlite

Bonjour,

Je sauvegarde un boolean en provenance d'une checkbox dans une base sqlite3 comme ceci:

Code:

---

1 2	REQ := 'UPDATE MYTABLE SET MYBOOL='+BoolToStr(MyCheckBox.Checked[0])

---

Dans la base la valeur affectée a MYBOOL est -1 lorsque vrai et 0 lorsque faux. OK.

Lorsque je récupère cette valeur La checkbox reste toujours non cochée même lorsque la valeur est vraie

Code:

---

1 2	MyCheckBox.Checked[0]:=DB.FieldByName('MYBOOL').AsBoolean;

---

Code:

---

1 2	showmessage(booltostr(DB.FieldByName('MYBOOL').AsBoolean));

---

retourne 0 alors qu'il y a -1 dans la base

Code:

---

1 2	if DB.FieldByName('MYBOOL').AsBoolean =true then showmessage('Vrai') else showmessage('Faux');

---

retourne faux alors qu'il y a -1 dans la base

Quelqu'un a une idée sur ce problème ?

Merci


Lazarus SVN 0.9.29 Linux Ubuntu 10.04

Bon ben en fait juste de poster ici permet de trouver la soluce.
Plus efficace qu'un cierge :mouarf:

il faut renseigner les valeurs TrueBoolStrs et FalseBoolStrs

Code:

---

1 2 3 4 5 6 7

SetLength(TrueBoolStrs,2); SetLength(FalseBoolStrs,2); TrueBoolStrs[0] := '1'; TrueBoolStrs[1] := 'true'; FalseBoolStrs[0] := '0'; FalseBoolStrs[1] := 'false';

---

et utiliser

Code:

---

1 2	BoolToStr(MyCheckBox.Checked[0],true)

---

comme ça dans la base on retrouve 1 au lieu de -1
et au chargement les checkbox fonctionnent

C'est bizarre quand même que -1 ne soit pas interpreté comme True

A+

Merci car je cherchai aussi l'info ^^, elle me sera utile dans peu de temps.

Par contre :

Code:

---

REQ := 'UPDATE MYTABLE SET MYBOOL='+BoolToStr(MyCheckBox.Checked[0])

---

Ton champ MYBOOL dans ta base sq3 est en 'TEXT' ?

Non il est en boolean

A+