begin process at 2012 02 11 09:07:48
  Trouver un code source :
 
dans
 
Accueil > Forum > 

Delphi

 > 

Divers

 > 

Débutant(e)

 > 

Chaine Supprimer des apostrophes


Derniers messages déposésPoser une question dans le forum ou lancer une discussion

Chaine Supprimer des apostrophes

samedi 3 juin 2006 à 18:23:20 | Chaine Supprimer des apostrophes

Filipe35

Bonjour à tous

Je me hurte au problème suivant
j'ai une chaine quit vaut
'uebgse.bob'
J'aimerais supprimer les apostropes de cette chaine mais je ne trouve pas comment faire.

J'ai essayé avec AnsiReplaceStr(var,chr(27),'');
et d'autres méthodes mais rien n'y fait ...

Peut-être que la solution est devant moi mais je vois vraiment pas

Merci à tous ceux qui pourrons se pencher sur mon problème.

++

Filipe

__________________________________________________
[ Lien ] - Le site sur ogame de référence !
[ Lien ] - Le gén&#
samedi 3 juin 2006 à 18:55:43 | Re : Chaine Supprimer des apostrophes

Filipe35

Solution temporaire mais bon

temp:=var;
If AnsiPos('''', temp) > 0 then temp := Copy(temp, 2, length(temp));
If AnsiPos('''', temp) > length(temp)-2 then temp := Copy(temp, 0, length(temp)-1);




__________________________________________________
[ Lien ] - Le site sur ogame de référence !
[ Lien ] - Le gén&#
samedi 3 juin 2006 à 19:02:30 | Re : Chaine Supprimer des apostrophes

CptPingu

Administrateur CodeS-SourceS
Essaie ceci:
AnsiReplaceStr(var,'''','')

Tu est sur que c'est chr(27) ?
samedi 3 juin 2006 à 19:06:59 | Re : Chaine Supprimer des apostrophes

CptPingu

Administrateur CodeS-SourceS
Réponse acceptée !
function supprimer(const chaine: string):string;
var
  i : integer;
begin
  Result := '';
  for i:=1 to length(chaine) do
    if chaine[i] <> ''''then
      Result := Result + chaine[i];
end;



Sinon ceci fonctionne chez moi.
samedi 3 juin 2006 à 19:46:36 | Re : Chaine Supprimer des apostrophes

Filipe35

AnsiReplaceStr(var,'''','')
ne fonctionne pas ;)

mais ta fonction si, en gros tu reprend 'ma technique' (si je peux me permettre :P ) et tu l'appliques à toute la chaine :P

Merci ;)




__________________________________________________
[ Lien ] - Le site sur ogame de référence !
[ Lien ] - Le gén&#
dimanche 4 juin 2006 à 02:22:11 | Re : Chaine Supprimer des apostrophes

japee

Membre Club Administrateur CodeS-SourceS
Réponse acceptée !

Il faut faire attention à l'utilisation correcte de la fonction AnsiReplaceStr !

uses StrUtils;

var
  NewString, OldString: string;

procedure TForm1.Button1Click(Sender: TObject);
begin
  OldString := 'uebgse.bob';
  NewString :=  AnsiReplaceStr(OldString, '''', '');
  { no problem, on obtient NewString = uebgse.bob }
  Edit1.Text := NewString;
end;

Bonne prog'

dimanche 4 juin 2006 à 08:23:53 | Re : Chaine Supprimer des apostrophes

f0xi

Membre Club Administrateur CodeS-SourceS
Réponse acceptée !
ChainePos !!!! regarde les sources.

S := '''blabla''';
NS := ChainePos('''',S,2);

ou sinon tout simplement :

S := copy(S,2,Length(S)-1);

lundi 5 juin 2006 à 17:49:25 | Re : Chaine Supprimer des apostrophes

Filipe35

Merci à vous 2 ;)

Pour la solution la solution à jappee, j'ai peut être omis var := .....
mais j'ai toujours marché sans oO

Pour la solution à foxi, elle est nikel pour tout faire en une ligne ^^
mais il faut juste vérifier la présence des apostrophes :P

Merci ;)
__________________________________________________
[ Lien ] - Le site sur ogame de référence !
[ Lien ] - Le gén&#
mardi 6 juin 2006 à 02:03:42 | Re : Chaine Supprimer des apostrophes

f0xi

Membre Club Administrateur CodeS-SourceS
Réponse acceptée !
s := stringreplace(S,'''','',[rfReplaceAll]);

pouf.


Cette discussion est classée dans : problème, chaine, supprimer, http, apostrophes


Répondre à ce message

Sujets en rapport avec ce message

apostrophes [ par felixge ] michelfélixEn lisant un fichier TXT je le découpe en tronçon qui doivent etre mis chacun dans un champ d'une table pour cela je construit dans mon pro Fonctionnalité non supportée!!??? [ par OrsE ] Salut tout le monde. J'ai un problème, j'arrive pas, à supprimer un enregistrement d'un TTable, j'ai une exception "Fonctionnalité non supportée". La Problème avec Pos(S1, S2) [ par Bacterius ] Bonjour, j'ai un petit problème avec la fonction Pos (pour trouver une sous-chaine dans une chaine).En fait j'essaye de faire un nettoyeur de cookies, Problème de conversion avec StrToFloat [ par John Dogget ] Salut à tous.Problème tous simple : quand j'utilise la fonction StrToFloat, Delphi semble rajouter des chiffres à la valeur réelle du nombre, et devie Problème TIdHttp.get (Indy) [ par jenlain62 ] Bonjour,J'ai un problème avec un composant Indy TIdHttp.Lorsque j'essaie de faire un GET des URL suivantes :http://streams.frequence3.net/mp3-192.m3uh problème d'impression d'image XP [ par goloa ] Bonjour,alors je reviens à la charge avec ce problème qui me semblais avoir été résolu ... (en tout cas sous win2000 ça l'est) (voir http://www.delph Transactions en ADO avec Delphi [ par salimdz2004 ] J’ai un problème avec les Transactions en ADO avec Delphi J’ai utilise BeginTrans de Composent ADO pour démarre une nouvelle transaction dans la sauvegarder l'index des imprimantes [ par ioda19 ] Bonjour,         J'ai une question à propos des imprimantes et je m'en tire les cheveux.J'ai une application que j'ai fait où l'usager peux configurer Dragon Soul Online recrute. [ par katanasoft ] Bonjour, Je vous présente le projet de jeu de rôle massivement multijoueur et exclusivement jouable sur internet, nommé Dragon Soul Online. Deep Wor


Nos sponsors


Sondage...

CalendriCode

Février 2012
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
272829    

Consulter la suite du CalendriCode

Photothèque

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 2,028 sec (4)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales