Como crio form por componente

Question

Quero criar um componente para guardar o caminho do banco no registro do windows, mas n�o sei como fazer para um componente gerar um form. Como posso fazer isso?...

Paulo_amorim · Answer

Ol�Para ele criar um form, pode-se fazer:[code:1:8c925ecd14]with TForm.Create(Application) dobegin  <defina tamanho e outras propriedades>  ShowModal;end;[/code:1:8c925ecd14]S� n�o entendi o que tem o registro com isso...Espero que ajudeAt�+...

Emir Neto · Answer

Apenas armazenar o caminho do banco...

Massuda · Answer

Para armazenar o caminho do banco, voc� pode criar uma classe que usa internamente um TRegistry e incluir uma propriedade do caminho do banco... por exemplo

uses
  Registry,
  ...

type
  TMinhaConfiguracao = class
  private
    ...
    function GetCaminhoBD: string;
    procedure SetCaminhoBD(Value: string);
    ...
  public
    property CaminhoBD: string read GetCaminhBD write SetCaminhoBD;
  end;

...

function TMinhaConfiguracao.GetCaminhoBD: string;
begin
  with TRegistry.Create(...) do begin
    try
      ...
      Result := ReadString(�CaminhoDoBD�);
      ...
    finally
      Free;
    end;
  end;  
end;

procedure TMinhaConfiguracao.SetCaminhoBD(Value: string);
begin
  with TRegistry.Create(...) do begin
    try
      ...
      WriteString(�CaminhoDoBD�, Value);
      ...
    finally
      Free;
    end;
  end;  
end;

F�rum Como crio form por componente #268961