Acceste Boolean değerleri yerine 0 ve 1

[kelaynak2]

Accesle yaptığım veritabanının diğer veritabanları ile uyumlu olması için Boolean değerleri yerine 0 ve 1 değerlerini kullandım.
Bir tuşa basınca değerin tersinin olmasını istiyorum.Boolean olsaydı bu kolaydı:
adoquery1sifre.asboolean:=not adoquery1sifre.Asbloolean;
Fakat alanı bayt olarak tanımlayınca Uzun bir kod yazmak gerekiyor:

if adoquery1sifre.asinteger=0 then
adoquery1sifre.asinteger:=1
else
adoquery1sifre asinteger:=0;

bu kodun daha basit hali olabilirmi.Dilimin ucunda getiremedim.

adoquery1sifre.asinteger:=0 XOR adoquery1sifre.asinteger; gibi bir şey.
Selamlar.

[kelaynak2]

Çözümü buldum.Gerek kalmadı.

adoquery1sifre.asinteger:=integer(1 xor adoquery1sifre.Asinteger);

[fduman]

Kod: Tümünü seç

adoquery1sifre.asboolean:=not adoquery1sifre.Asbloolean;

Böyle olması lazım. Integer ve Boolean birbirine dönüşebilir.

[kelaynak2]

@Coderland
sizin dediğiniz şekilde yazarsam
cannot access 'field' type boolean mesajını veriyor.Deneyebilirsiniz.
selamlar.