Discussion :

[neuneu1]

bonjour,
je ne sais pas s il est possible de retrouve un nombre dans une chaine de caractere.

je m expliqque , j'ai besoin de pourvoir recuperer id d un table afin de l'effacer.
cet id apparait dans un item de mon planning:

exemple:

j'afiche a laide d une requete tout les horaires d un prof dans un composant tplanner:
le resultat affiche dans un item idprof, son nom;
1
olivier

j'ai besoinde recuperer le 1 pour effectuee un delete sur une table..
est ce possible

merci
a+
bon week end

[Cl@udius]

Salut

Avec quelque chose comme ça ?

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
 
function ExtraireID(const S: string): string;
var
  I, L: Integer;
begin
  I := 1;
  L := Length(S);
  while (I <= L) and (S[I] in ['0'..'9']) do
  begin
    result := Copy(S, 1, I);
    Inc(I);
  end;
end;

Avec une chaine par exemple: '128 Dupont' la fonction te renvoie '128'.

@+ Claudius

[neuneu1]

La j 'admire

Je suis a chaque fois etonne des reponse et comment vous ecrive du code..

Moi qui suis qu un petit admin reseau, qui connait si peu la prog, je suis epate de la solution trouve et quand je la vois, je me dit mais oui c'est ca

top moumouth

merci je test a plus

[neuneu1]

top ca marche,

moi qui cherchais une fonction delphi qui prennais x caractere ,etc..

ouaou , super

merci