Programa��o orientada a objeto

Question

OlaCrie esse Post porque ainda tenho muitas duvidas sobre esse assunto(duvidas que ate pode ser f�ceis  mas...  :mrgreen: ).TipoEu fa�o uma classe e tbm as procedures . Mas como usar as procedures? Co...

Beppe · Answer

� imposs�vel explicar tudo num post s�, ent�o vou resumir um bocado.

Est� � uma classe chamada Veiculo:

type
  Veiculo = class(TObject)
  private
    FCor: Cor;
    FKilometragem: Double;
  public
    constructor Cria(const Cor: String);
    procedure Anda(Kms: Double);
    function PegaInfo: String;
  end;

constructor Veiculo.Cria(const Cor: String)
begin
  inherited Create;
  FCor := Cor;
end;

procedure Veiculo.Anda(Kms: Double);
begin
  FKilometragem := FKilometragem + Kms;
end;

function Veiculo.PegaInfo: String;
begin
  Result := Format(�Sou um ve�culo �s e j� percorri �g kms�, [FCor, FKilometragem]);
end;

Pode ser usada assim:

var
  V: Veiculo;
begin
  V := Veiculo.Cria(�vermelho�);  // cria um vermelho
  try
    V.Anda(1.2);                  // anda um pouco
    ShowMessage(V.PegaInfo);      // exibe informa��es atuais de V
    V.Anda(7.3);
    ShowMessage(V.PegaInfo);
  finally
    V.Free;
  end;
end;

Quando eu chamo Veiculo.Cria(...), um novo Veiculo � criado(inst�nciado), e qualquer m�todo que eu chamar sobre ele opera sobre os dados da inst�ncia passada como o �sujeito da frase�, neste caso V.

Ferdelphi12540 · Answer

E ai pessoal,Gostaria de saber se alguem conhece um livro bom de POO, sou iniciante em POO e gostaria de saber mais sobre o assunto. Ja li algumas coisas sobre, mas s�o escrito em uma linguagem que � dificil de entender, e gostaria de saber de um livro de facil entendimento..Obrigado..Fernando...

Nigro · Answer

A todos voc�s...Gostaria de saber a opini�o sobre POO, pois estou em uma empresa, onde a linguagem utilizada � V.O. e aqui s� trabalham assim com O.O, estou enlouquecendo pois nunca tinha visto isso antes, � uma tend�ncia? � uma forma melhor de se trtabalhar? � mais f�cil de dar manuten��o no sistema? Vantagans e desvantagans... Por favor....Obeigado...

Dart · Answer

BeppeMas da para fazer uma procedure para criar o um novo Veiculo? e como executar esse procedure?Valeu....

Beppe · Answer

[quote:be63570ae8=�Dart�]BeppeMas da para fazer uma procedure para criar o um novo Veiculo? e como executar esse procedure?Valeu.[/quote:be63570ae8]Sim. Esse tipo de procedure chama-se [b:be63570ae8]constructor[/b:be63570ae8](construtor). D� uma olhada no exemplo que passei, constructor Cria, embora geralmente chamamo-os de Create. Um [i:be63570ae8]construtor[/i:be63570ae8] � visto como uma fun��o de classe, � que voc� chama atrav�s da pr�pria classe, e n�o de um objeto. Um construtor retorna uma nova inst�ncia da classe.Ex:[code:1:be63570ae8]V := Veiculo.Create(�verde�); // certoV := V.Create(�verde�); // errado, n�o compilaV.Create(�verde�); // compila, faz inicializar a classe, mas � conceitualmente erradoconceitualmente errado[/code:1:be63570ae8]...

F�rum Programa��o orientada a objeto #208262