Unconfigured Ad Widget

Collapse

Anúncio

Collapse
No announcement yet.

Array - Arrando em Delphi

Collapse
X
 
  • Filter
  • Tempo
  • Show
Clear All
new posts

  • Font Size
    #1

    Tutorial Array - Arrando em Delphi

    Depois de procrarizar muito, resolvi aprender a usar array - algo super prático

    Conceito básico de array: Array serve para salvar diversos dados, em lugares específicos.
    Util para quando presisa salvar 1000 dados separados sem ter que fazer 1000 variáveis, como por exemplo.

    Comandos:
    Para definir uma array, use a fórmula geral:
    (nome da variável): array of (tipo);
    No primeiro exemplo, irei usar integer e o nome será nume, ficando
    nume: array of integer;
    Agora, crie um spinedit (na aba samples) e um button, lado a lado.
    No button, coloque o comando:
    SetLength(nume, spinedit1.value);
    Isso irá definir o limite a array nume.

    Crie dois spinedit e um button. Coloque o button entre os dois novos spinedit, e o caption do button "adicionar ao", apenas para organização mesmo.
    No button, inclua:
    nume[spinedit3.Value] := spinedit2.Value;
    Ou seja, o espaço do valor do spinedit3 terá o conteudo do valor do spinedit2

    Lembre-se que o spinedit3 não poderá ter um valor maior que o limite que definiu...


    Tudo bem, salvamos os dados, agora presiso usa-los!
    Crie mais um spinedit. No lado dele inclua um button, e abaixo dele, uma label.
    No button, insira:
    label1.Caption := IntToStr(nume[spinedit4.value]);
    Ou seja, a label1 irá exibit o conteudo da array nume que se refere ao espaço do valor do spinedit4




    Aproveitem que estou de bom humor hoje e fiz esse tutorial bem explicado
    Depois faço uma vídeo aula disso....
    (Piada de nerd) - Você comprou o cu dele?
    - Sim, comprei, era super duro e bem feito! Esse metalúrgico é de confiança!
    (Piada by Kaao; inventei ela do nada '-')

    NÃO RESPONDO PERGUNTAS POR PM!

    Se quiser uma ajuda minha, me indique o tópico com a sua duvida.

    Similar Threads
X
Working...
X