Definição de classe no delphi

Delphi

23/10/2005

Quando iniciamos um projeto, ao abrir o form, o delphi já define uma clase:

type TForm1 = class(TForm)


Como faço para eu construir minha própria classe? Tipo:

Tdata: class dia,mes,ano: word;


Dei apenas um exemplo. Se eu definir loga abaixo da TForm, gerará um erro na compilação. Como proceder? Desde já grato.

PS: A pergunta é, como criar e instanciar uma classe em delphi?


Paulo

Paulo

Curtidas 0

Respostas

Raserafim

Raserafim

23/10/2005

vc pode criar a classe logo após o Tform ou antes:
type
  TFrmPrincipal = class (TFrom)
  ...
  ...
  end;

type TMinhaClasse = class
  ...
  ...
  end;

agora vc declara uma variável como o tipo da sua classe:
var
  FrmPrincipal: TFrmPrincipal;
  MinhaClasse: TMinhaClasse;

agora vc procisa instanciar a variável com o tipo da sua classe. em algum procedimento (ex: no OnCreate do Form).
procedure ...
begin
  MinhaClasse := TMinhaClasse.Create;
end;

apartir daí vc poderá usar a sua classe.


GOSTEI 0
Paulo

Paulo

23/10/2005

ok, vou testar, grato!


GOSTEI 0
POSTAR