Olá galera, irei mostrar agora como se trabalhar com record, no Delphi, e na próxima Quick, como fazermos uma lista deste record, usando Array.

Vamos a construção do exemplo,

  Adicione 2 LabeledEdit(EdtNome, EdtEMail)
  Adicione 3 Botões(BtnGravar,BtnLer,BtnLista[este será para listar os array de record]
  Adicione um RadioGroup(RGSexo[Adicione dois items(M,F)])

Seu exemplo ficará assim :



Na seção Interface implemente as seguintes linhas, que é a estrutura de um record. E no private da classe do seu formulário declare uma variável do tipo do seu record




No Clique do botão gravar implemente o seguinte código



No Clique do botão Ler implemente o seguinte código




Com estes dois botões, podemos gravar e armazenar em um único lugar, diversas informações, como se fosse um registro em uma tabela, você pode ter atributos de diversos tipos, nos exemplo só estamos usando String, mas nada nos impede de usar um Real ou um Boolean, por exemplo.

Fico por aqui e na próxima Quick veremos como criar uma lista deste Record.

Um abraço

Wesley Y
wyamazack@hotmail.com