RibaSoft

Aba RTTI — Data-Binding com Objetos em Memória

Visualmente e na interação com o usuário final, um TTIEdit é idêntico a um TEdit comum. A mágica deles é totalmente arquitetural.

Para entender: os Data Controls (aba Data Controls) como TDBEdit servem para ligar um campo de texto diretamente a um campo de uma tabela no Firebird (via TDataSource), sem escrever código para mover o dado do banco para a tela. Os componentes RTTI fazem exatamente a mesma coisa, mas em vez de se conectarem a um banco de dados, eles se conectam a propriedades de classes/objetos em memória.

• • O problema que o RTTI resolve
  • TTIEdit, TTICheckBox, TTISpinEdit — Componentes individuais
  • TTIPropertyGrid — O Object Inspector dentro do seu sistema
  • Cenários práticos em ERP

O Problema que o RTTI Resolve

• Imagine que você criou uma classe no seu ERP para gerenciar as configurações da balança do PDV:

  type TConfigBalanca = class published property PortaCOM: String; property BaudRate: Integer; property Ativa: Boolean; property ProtocoloComunicacao: String; end;

  Se você fosse criar uma tela para o usuário editar isso com componentes da aba Standard, você teria que escrever:

  // Código de "Ida" (objeto → tela ao abrir): procedure TFormConfigBalanca.FormShow(Sender: TObject); begin EditPortaCOM.Text := FConfigBalanca.PortaCOM; SpinEditBaudRate.Value := FConfigBalanca.BaudRate; CheckBoxAtiva.Checked := FConfigBalanca.Ativa; ComboProtocolo.Text := FConfigBalanca.ProtocoloComunicacao; end; // Código de "Volta" (tela → objeto ao salvar): procedure TFormConfigBalanca.BotaoSalvarClick(Sender: TObject); begin FConfigBalanca.PortaCOM := EditPortaCOM.Text; FConfigBalanca.BaudRate := SpinEditBaudRate.Value; FConfigBalanca.Ativa := CheckBoxAtiva.Checked; FConfigBalanca.ProtocoloComunicacao := ComboProtocolo.Text; end; // Com RTTI, nenhum dos dois blocos acima precisa ser escrito.

TTIEdit, TTICheckBox, TTISpinEdit

• São os equivalentes RTTI dos componentes comuns. Você os configura via Object Inspector apontando para o objeto e a propriedade que eles devem refletir.

  // Configurar via Object Inspector: // TTIEdit1.TIObject := FConfigBalanca // TTIEdit1.PropertyNameToLink := 'PortaCOM' // TTISpinEdit1.TIObject := FConfigBalanca // TTISpinEdit1.PropertyNameToLink := 'BaudRate' // TTICheckBox1.TIObject := FConfigBalanca // TTICheckBox1.PropertyNameToLink := 'Ativa' // Ou por código (quando o objeto é criado dinamicamente): TTIEdit1.TIObject := FConfigBalanca; TTIEdit1.PropertyNameToLink := 'PortaCOM'; TTIEdit1.UpdateControl; // Força atualização inicial da tela // Quando o usuário alterar o TTIEdit1, // FConfigBalanca.PortaCOM é atualizado INSTANTANEAMENTE. // ZERO código no OnChange ou OnExit.

  Para usar o TMultiPropertyLink: É o componente "ponte" que liga vários componentes RTTI a um único objeto, parecido com o papel do TDataSource nos Data Controls. Ao trocar o objeto no TMultiPropertyLink, todos os componentes conectados a ele atualizam ao mesmo tempo.

TTIPropertyGrid — O Object Inspector no seu Sistema

• Esta é a estrela absoluta da aba. Sabe o Object Inspector do próprio Lazarus (aquela janela onde você muda o Name, Width e Color dos componentes durante o desenvolvimento)? O TTIPropertyGrid é o Object Inspector — disponível para você colocar dentro do seu próprio sistema.

  Se você apontar qualquer objeto do seu sistema (uma nota fiscal, uma configuração, ou até um componente da própria tela) para a propriedade TIObject desse grid, ele varre a classe, descobre sozinho todas as propriedades published que ela tem, e monta o grid visual com as opções de edição corretas — tudo em tempo de execução.

  // Tela de configurações universal — SEM desenhar campos individuais: // Quando o usuário clica em "Fiscal" no menu de configurações: TTIPropertyGrid1.TIObject := FConfigFiscal; // Objeto de config fiscal // Quando clica em "Balança": TTIPropertyGrid1.TIObject := FConfigBalanca; // Objeto de config balança // Quando clica em "NF-e": TTIPropertyGrid1.TIObject := FConfigNFe; // Objeto de config NF-e // O grid redesenha AUTOMATICAMENTE todos os campos da classe apontada. // Se FConfigFiscal tem 20 propriedades published, aparecem 20 linhas. // Se FConfigBalanca tem 5 propriedades, aparecem 5 linhas. // Tipos de campo corretos: String → TEdit inline, Boolean → CheckBox, etc. // ZERO código de interface adicional necessário.

Cenários Práticos em ERP

• Telas de Configuração Universais

  Em vez de desenhar uma aba gigante de configurações com dezenas de campos para cada módulo, você pode ter um único TTIPropertyGrid na tela. Conforme o usuário clica no menu (Fiscal, Impressão, Balcão, Certificado Digital), você simplesmente passa o respectivo Objeto de configuração para o Grid e ele redesenha a tela de edição sozinho.

  // Menu lateral com TreeView + TTIPropertyGrid: procedure TFormConfiguracoes.TreeViewMenuClick(Sender: TObject); begin case TreeViewMenu.Selected.AbsoluteIndex of 0: TTIPropertyGrid1.TIObject := FConfigGeral; 1: TTIPropertyGrid1.TIObject := FConfigFiscal; 2: TTIPropertyGrid1.TIObject := FConfigNFe; 3: TTIPropertyGrid1.TIObject := FConfigBalanca; 4: TTIPropertyGrid1.TIObject := FConfigCertificado; end; end;

• Padrão MVC/MVVM

  Para arquiteturas mais modernas, onde as regras de negócio ficam estritamente em classes e não nos formulários, o RTTI cria a ponte visual perfeita sem sujar a classe de domínio com código de interface gráfica. Seus objetos de negócio permanecem puros e testáveis.

• Ferramentas de Personalização pelo Usuário

  Se você estiver criando uma ferramenta onde o próprio usuário pode montar telas ou mexer no layout do recibo, você usa o TTIPropertyGrid para deixá-lo alterar as propriedades dos objetos (fontes, cores, tamanhos) visualmente — igual você faz na IDE do Lazarus durante o desenvolvimento.