Erro ao mudar uma String

Question

Pessoal eu estou tentando formatar um Edit que � o numero do telefone, mas esta dando esse erro:�Esse programa efetuou uma opera��o ilegal� e ja fecha o programa...Bom estou tentando o seguinte queria...

Japa · Answer

Ja sei o porque desse erro... e porque estou tentando utilizar um elemento a mais do vetor.... tipo tentando acessar uma memoria que n�o existe... como fazer para n�o acontecer isso?? sera que o edit n�o deixa aumentar mais alem do tamanho que eu tenho (quanto ao tamanho que eu digito)??? :cry: obrigado pela aten��o....

Beppe · Answer

Strings n�o s�o auto ajust�veis. Para aumentar o tamanho de uma string, chame SetLength numa vari�vel, ou concatene(+)....

Japa · Answer

ahhh Obrigado amigo...  :D  Bom em programa��o em C aprendi a fazer uma lista encadeada sera que no pascal tem como fazer tambem???Obrigado pela aten��o......

Ljr · Answer

vc poderia colocar o trecho do codigo que ta dando problema?

Tentei fazer assim e nao deu nenhum erro.

var
  txt: string;
begin
  Edit1.text:= �a�;
  txt:= edit1.text;
  txt[1]:= txt[10];
  caption:= txt;
end;

Beppe · Answer

Claro, c duvida?[code:1:f2f5c2290a]type  PList = ^TList;  TList = record    Next: PList;    Info: ...  end;function Prepend(List: PList; Info: ...): PList;begin  New(Result);  Result.Info := Info;  Result.Next := List;end;[/code:1:f2f5c2290a]Ex:[code:1:f2f5c2290a]Root := NewList(nil, ...);[/code:1:f2f5c2290a]� isso q vc queria?...

Japa · Answer

Brigad�o pela for�a amigos vou tentar aqui  :wink:...

Japa · Answer

Amigo voce pode me explicar um pouco o seu codigo??? e que estou com um pouco quer dizer muitas duvidas hehehe

type PList = ^TList; TList = record Next: PList; Info: ... end;

Plist=^Tlist // aqui ele recebe o ponteiro ^Tlist???
TList=record // aqui e como declarar uma Struct (registro)??

function Prepend(List: PList; Info: ...): PList; begin New(Result); Result.Info := Info; Result.Next := List; end;

New(Result); //Aqui ele aloca uma parte da memoria???

Root := NewList(nil, ...);

Aqui n�o entendi nada :cry:

Bom ainda tem mais uma duvida, quando � que vou saber que � o ultimo numero??? tipo no C � NULL e no pascal � esse nil???

Descupe as minhas perguntas e que sou meio (totalmente) leigo em pascal, e ainda por cima sou meio burrinho :cry:

Beppe · Answer

Me diz o q tu quer fazer e eu mostro como....

Japa · Answer

Amigo eu queria (so para aprender) fazer uma lista encadeada de inteiros que tive-se um edit e que eu tive-se um bot�o.. e ao clicar no bot�o ativa-se o evento para inserir em um TMemo... para aprender sera que voce me ajudaria??? obrigado... :D

Beppe · Answer

N�o precisa ser uma lista encadeada, pode ser um TList(a classe na unit Classes).

var
L: TList;
begin
L := TList.Create;
end;

Addicionar um inteiro:

L.Add(Pointer(Numero));

Pegar o primeiro:

Integer(L[0]);

Pegar o �ltimo:

Integer(L[L.Count - 1]);

Deletar um n�mero:

L.Delete(Indice);

Classes.TList trabalha com pointers/objetos, por isso as [i:8a3525c410]typecasts[/i:8a3525c410]

Japa · Answer

Putz e t�o facil assim poxa valews Ataliba agrade�o mutio  :D...

F�rum Erro ao mudar uma String #186284