Bonjour,
 
Je débute en Delphi et j'aimerai insérer des données dans access via Delphi.
 
Mon souccis vient du faite que ces données sont de la forme :
"donnee1;donnee2;donnee3"
 
J'aimerai insérer ces données sous une BDD en prenant comme délimiteur ";"
 
Je pense qu'il faut utiliser la fonction "substr", mais j'aimerai savoir comment.
 
Merci

Pos -> te renvois la position d'une chaine ds une autre
Copy -> copie unmorceau d'une chaine grace à un départ et une longueur
F1 -> te donne l'aide

 
Merci, je sais où se situe l'aide, mais si elle m'avait donnée une réponse je n'aurais pas posté.
 
J'ai fait ce code là :
PosEx := Pos(';',x);
Temp2 := Copy(x,1,PosEx-1) ;
 
Et j'aimerai faire une boucle me permettant de passer d'une donnée à une autre, mais je ne vois pas comment.
 
Si tu peux m'aider, je t'en remercie d'avance.

Je verais ça se soir G pas Delphi sous la main

ok, merci

C'est bon j'ai résolut mon problème.
 
while PosEx > 0 do
begin
    PosEx:=Pos(';',x);
    if (PosEx <> 0 ) then
    begin
        Temp2 := Copy(x,1,PosEx-1) ;
        showmessage(Temp2);
        delete(x,1,PosEx);
    end;
end;

Y a plus simple pour les fainéants.
 
 
with TStringList.Create do
try
  CommaText := StrReplace(TonStr,';',',',[rfReplaceAll]);
  for i:=0 to Count-1 do
    ShowMessage(Strings[i]);
finally
  Free;
end;
 
 

spa plus propre de mettre  
Delimiter := ';';
DelimitedText := TonStr;
?  

antp a écrit a écrit : spa plus propre de mettre   Delimiter := ';'; DelimitedText := TonStr; ?

 
Si, mais j'aime mieux le CommaText  

Ouais avec un StringReplace, très classe, surtout si y a deja des "," dans ses textes

Couché!
Vilain!
 
 

antp a écrit a écrit : Ouais avec un StringReplace, très classe, surtout si y a deja des "," dans ses textes

bien vue
 

Ok, merci