Como crio form por componente

Delphi

17/02/2005

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?


Emir Neto

Emir Neto

Curtidas 0

Respostas

Paulo_amorim

Paulo_amorim

17/02/2005

Olá

Para ele criar um form, pode-se fazer:

with TForm.Create(Application) do
begin
  <defina tamanho e outras propriedades>
  ShowModal;
end;


Só não entendi o que tem o registro com isso...

Espero que ajude
Até+


GOSTEI 0
Emir Neto

Emir Neto

17/02/2005

Apenas armazenar o caminho do banco


GOSTEI 0
Massuda

Massuda

17/02/2005

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;



GOSTEI 0
POSTAR