Typcasting Delphi

**Alex_ITA01**

Hallo Delphianer,
ich wollte nur mal von euch wissen, ob folgende zwei Codebeispiele irgendein Unterschied für den Compiler oder das Programm darstellen:

zusammenfalten · markieren

Delphi-Quellcode:

			procedure TMyForm.ComponentClick(Sender: TObject);

begin

  if Sender is TButton then

  begin

    ShowMessage((Sender as TButton).Caption);

  end;

  if Sender is TEdit then

  begin

    ShowMessage((Sender as TEdit).Text);

  end;

end;

zusammenfalten · markieren

Delphi-Quellcode:

			procedure TMyForm.ComponentClick(Sender: TObject);

begin

  if Sender is TButton then

  begin

    ShowMessage(TButton(Sender).Caption);

  end;

  if Sender is TEdit then

  begin

    ShowMessage(TEdit(Sender).Text);

  end;

end;

Viele Grüße
Alex

Typcasting Delphi

Typcasting Delphi

Forumregeln