Variables dans un champs

Bonjour

J’ai un champs nommé Field4 contient des enregistrements similaires à l’enregistrement ci-dessous :

Code:

---

1010100000000000000000000000000000000100300100100000000000000000000000400000000000000000000000000000

---

(100 chiffre)
P1/P2/……./P100 (position)

Si le chiffre différent de zéro indique une trace comment je peux compter le nombre de la position P1 en fonction du champs Field4 si la position:

Code:

---

P1<>0

---

.

Cdt.

Citation:

---

Envoyé par louay02

Bonjour

J’ai un champs nommé Field4 contient des enregistrements similaires à l’enregistrement ci-dessous :

Code:

---

1010100000000000000000000000000000000100300100100000000000000000000000400000000000000000000000000000

---

(100 chiffre)
P1/P2/……./P100 (position)

Si le chiffre différent de zéro indique une trace comment je peux compter le nombre de la position P1 en fonction du champs Field4 si la position:

Code:

---

P1<>0

---

.

Cdt.

---

Salut,
j'ai fait un petit exemple, en remplaçant le Tfield Par Tlabel, et si j'ai bien compris la question, c'est la proc qu'il faut.

Code:

---

1 2 3 4 5 6 7 8 9

procedure TForm1.Button1Click(Sender: TObject); var i:integer; begin for i:=0 to length(label1.Caption)-1 do begin if StrToInt(AnsiMidStr(Label1.Caption,i,1)) <> 0 then ListBox1.Items.Add(AnsiMidStr(Label1.Caption,i,1)+' '+IntToStr(i)); end; end;

---

:ccool:

:?

:koi:

je ne comprends pas !

Merci liazidf

J’ai fais mal expliquer

j'utilise une base de donnée Access je cherche par exemple une commande qui compte combien j'ai un 1 dans la première position du Field4
contenu du [Field4]

0010100000000000
1010100000000000
1010100000000100
1010100000000001

comme la commande substr

pour utiliser DANS access ou pour traiter dans DELPHI ?

Citation:

---

Envoyé par dehorter olivier

pour utiliser DANS access ou pour traiter dans DELPHI ?

---

un composant ADOquery lié à la base de donnée Access

Citation:

---

Envoyé par louay02

Merci liazidf

J’ai fais mal expliquer

j'utilise une base de donnée Access je cherche par exemple une commande qui compte combien j'ai un 1 dans la première position du Field4
contenu du [Field4]

0010100000000000
1010100000000000
1010100000000100
1010100000000001

comme la commande substr

---

C'est pas trés clair, on ne peut pas avoir plus de 1 chiffre à la premiere position, reformuler votre problème, ensuite si vous utilier adoquery il y a SQL pour compter le nombre d'occurences :ccool:

Salut

J'ai également du mal à comprendre ce que tu veux obtenir. :koi:

En se basant sur ces données exemples:

Citation:

---

0010100000000000
1010100000000000
1010100000000100
1010100000000001

---

Le résultat que tu souhaites obtenir est-ce 3 ? (car 3 données sur 4 ont '1' comme 1° caractère).

Si oui cette requête fera l'affaire:

Code:

---

1 2 3

SELECT COUNT(*) FROM MA_TABLE WHERE FIELD4 LIKE '1*';

---

Enfin si j'ai bien compris. :?

@+ Claudius

Citation:

---

Envoyé par louay02

Merci liazidf

J’ai fais mal expliquer

j'utilise une base de donnée Access je cherche par exemple une commande qui compte combien j'ai un 1 dans la première position du Field4
contenu du [Field4]

0010100000000000
1010100000000000
1010100000000100
1010100000000001

comme la commande substr

---

Field4 c'est la 4eme position de la ligne ?

et je repete :

Citation:

---

pour utiliser DANS access ou pour traiter dans DELPHI ?

---

et pour preciser : faut-il faire le traitement dans ACCESS ou dans DELPHI ?

ce n'est vraiment pas clair :calim2:

Exp:

une table access qui contient un Champs Field4

Field4
10101000000000
10000000000101
10101000000000
00000000000000
10101000000000
00000000000000
10000000000000
00000000000000

il y a 5 enregistrement par rapport 8 commence leurs première position par un 1
il y a 3 enregistrement par rapport 8 commence leurs troisième position par un 1

je cherche une requête SQL dans Access qui fait ce traitement

quelque chose comme ca

Code:

---

select Mid([Field4],1,1) from AllTable

---

bien plus clair :mouarf:

SUBSTRING existe en Access ?

Code:

---

1 2 3

SELECT COUNT(*) FROM ma_table WHERE SUBSTRING(ma_table.Field4 FROM 1 FOR 1) = '1'

---

Syntaxe FIREBIRD

voila l'idee pour la premiere colonne ...

Si tu veux compter c'est plutôt comme ceci:

Code:

---

1 2 3

SELECT COUNT(*) FROM ALLTABLE WHERE MID(FIELD4, 1, 1) = '1';

---

[Edit]
@Olivier: Sous Access Mid = SubString

Citation:

---

Envoyé par Cl@udius

Salut

J'ai également du mal à comprendre ce que tu veux obtenir. :koi:

En se basant sur ces données exemples:


Le résultat que tu souhaites obtenir est-ce 3 ? (car 3 données sur 4 ont '1' comme 1° caractère).

Si oui cette requête fera l'affaire:

Code:

---

1 2 3

SELECT COUNT(*) FROM MA_TABLE WHERE FIELD4 LIKE '1*';

---

Enfin si j'ai bien compris. :?

@+ Claudius

---

Vous avez utiliser LIKE pour vérifier la premiére position, mais comment vous pouvez vérifier la 2 ° et la 3 °....ect° est ce qu'il égale un 1 afin de compter le total (Count(*))

Citation:

---

Envoyé par Cl@udius

Si tu veux compter c'est plutôt comme ceci:

Code:

---

1 2 3

SELECT COUNT(*) FROM ALLTABLE WHERE MID(FIELD4, 1, 1) = '1';

---

[Edit]
@Olivier: Sous Access Mid = SubString

---

Merci Cl@udius c'est ca que je suis entrain de chercher:ccool:

Syntaxe de Mid (voir F1 côté Access):

Citation:

---

Mid(Chaine, Début, Longueur)

---

Donc pour tester le 3° caractère, cela devient:

Code:

---

WHERE MID(FIELD4, 3, 1) = '1';

---

@+

Ok Cl@udius ca marche tres bien Merci à Vous
un remerciment à dehorter olivier et je n'oublier pas liazidf pour son support.