Fórum Ponteiros no delphi? #211434
03/02/2004
0
Sei que é básico no object pascal
Alguém tem um exemplo de quando? e como utilizar ponteiros no delphi
preciso so de uma idéia para trabalhar com eles
Valeu
Rogério
Rbbsoftware
Curtir tópico
+ 0Posts
03/02/2004
Vanius
no livro ´Topicos avançados de programação em Delphi 3´
temos o seguinte exemplo:
//modo tradicional
procedure TForm1.Button1Click(Sender : TObject); var MeuTexto : String; begin MeuText := ´Ola´; Edit1.Text := MeuTexto; end;
// usando PONTEIROS
procedure TForm1.Button1Click(Sender : TObject); var PontTexto : ^String; begin New(PontTexto); PontTexto^ := ´Ola´; Edit1.Text := PontTexto^; Dispose(PontTexto); end;
// ou entao
procedure TForm1.Button1Click(Sender : TObject); var PontTexto : ^String; begin GetMen(PontTexto, 256); PontTexto^ := ´Ola´; Edit1.Text := PontTexto^; FreeMen(PontTexto, 256); end;
Parece q temos várias vantagens ao usar ponteiros, como:
- o programa fica mais rápido pq a memoria é melhor gerenciada;
- Ao declarar ponteiros vc utiliza a memoria livre (heap);
- Vc pode alocar memoria diretamente;
- Reduz o uso de memoria
- Acelera a pesquisa em memoria.
Se quiser, scaneio este texto e envio para vc.
Abraços,
Vanius
[color=blue:265789c59a]Texto editado pelo Moderador para adicionar BBCode [code e /code] (AZ)[/color:265789c59a]
Gostei + 0
04/02/2004
Bluefox
Se precisar de qualquer ajuda, é só falar.
email: alex_informatica@yahoo.com.br
Gostei + 0
04/02/2004
Adriano Santos
valeu
tecnico@doiscliques.com
Gostei + 0
04/02/2004
Vanius
Dados do Livro:
Titulo: Tópicos Avançados de Programação em Delphi 3
Autor: Adelize Generini de Oliveira
Editora: Advanced Editora
O item de ponteiros esta na Parte II- Explorando o object Pascal
Ponteiros - Paginas 131-145.
acredito q o site da editora seja
www.relativa.com.br
o fone da relativa é (48) 224-4281
no livro temos os seguintes dados:
adelize@omninet.com.br
(48)249-7091 / 244-4894
Abraços,
Vanius Girodo
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)