-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
Em nome de clodoaldo tonial
Enviada em: quinta-feira, 16 de fevereiro de 2006 09:27
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] array em muitos Tedits..
Ola bom dia.
Voce pode utilizar um for no
var
v: array[1..50] of real;
nome: String;
i:integer;
{$R *.dfm}
procedure TForm1.Button2Click(Sender: TObject);
begin
For i:=1 to 50 do
begin
((Components.FindComponent('Edit'+inttostr(i))) as TEdit).Text:=0;
end;
else
begin
For i:=1 to 50 do
begin
v[
: [delphi-br] array em muitos Tedits..
Bom dia a todos, estou com um problema meio que "cavernoso", tenho que fazer a
leitura das strings de pelo menos 50 edits para posterior utlização destes
valores, entaum fiz o seguinte:
var
v1,v2,v3,v4,v5,v6,v7,v8,v9,v10,v11,v12,v13,v14,v
Bom dia a todos, estou com um problema meio que "cavernoso", tenho que fazer a
leitura das strings de pelo menos 50 edits para posterior utlização destes
valores, entaum fiz o seguinte:
var
v1,v2,v3,v4,v5,v6,v7,v8,v9,v10,v11,v12,v13,v14,v15,v16,v17,v18,v19,v20:real;
v21,v22,v23,v24,v25,
4 matches
Mail list logo