Fórum Problemas com array #170007

18/07/2003

0

Pessoal,

Tenho o seguinte array de char

var
Str : array[0..1024] of Char;
begin
Str := ´010´; // funciona
Str := Format(´¬3.3d´, [10]); // Dinâmico não funciona
end;

Como popular o array de forma dinamica?


Marcosjava

Marcosjava

Responder

Posts

18/07/2003

Cabelo

Para solucionar o seu problema, aconselho que vc utilize um array do tipo record, e assim possa trabalhar dinamicamente com ele.

Exemplo :

//declaração da array

unit FU00000;

interface

uses sysutils, Windows, classes, Dbtables, wwDBGrid, wwQuery, DB, Messages;

type
r_str = record
str : char;
end;

declarar uma array public

var s_dados : array of r_str;

no evento Create do form

SetLength(s_dados, length(s_dados) + 1);
s_dados[posiçao].str := Format(´¬3.3d´, [10]);

e vc pode usar assim quantas vezes quiser

não se ewqueça de matar o vetor no OnClose.

for v_i := 0 to high(s_dados) do
begin
s_dados[v_i].str := ´´;
end;

Sem mais

Cabelo 8)


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar