Alors, je vais expliquer un peu :
En fait, c'est tout bête (pour les pros), j'ai 2 memo.
Dans l'un des memos, j'ai une phrase :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
 
Grand transporteur 176 Chasseur léger 758
(les amateurs d'Ogame apprecieront)
Le but et de copier cette phrase dans le 2eme memo, mais caractere par caractere (car apres je veux m'amuser a enlever les espaces) et je bloque...
Voila ce que j'ai :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
procedure TForm1.btnCopierClick(Sender: TObject);
var
j : integer;
phrase : string ;
begin
for j := 0 to length(memo1.Lines[0])-1 do
phrase[j] := memo1.Lines[0][j];
memo2.Lines[0]:=phrase;
end;
end.
Cela me donne : 8 (la derniere valeur de la chaine du memo1)
Si je met a la place :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
phrase[j] := memo1.Lines[0][j];
...et si je met :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
memo2.Lines[0][J]:=phrase;
Il me dit que la partie gauche n'est pas affectable...

Voila, si quelqu'un avait une soluce...

PS : il y a une soluce dans le forum mais avec une fonction ValueFromIndex que je n'ai pas dans ma version de Delphi 6.