AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Programmieren allgemein class procedure aufrufen, wenn klasse zur designzeit noch nicht bekannt
Thema durchsuchen
Ansicht
Themen-Optionen

class procedure aufrufen, wenn klasse zur designzeit noch nicht bekannt

Ein Thema von hyype · begonnen am 19. Jan 2012 · letzter Beitrag vom 19. Jan 2012
 
hyype

Registriert seit: 5. Nov 2008
97 Beiträge
 
Delphi XE2 Professional
 
#5

AW: class procedure aufrufen, wenn klasse zur designzeit noch nicht bekannt

  Alt 19. Jan 2012, 14:24
vielen dank für eure antworten.
interface geht wie schon gesagt wurde nicht mit class procedures/functions, hatte ich auch probiert
basisklasse mit abstrakter methode ist z.z. auch meine lösung für das problem
ich bin mir aber nicht sicher, ob das nicht irgendwann nachteilig sein könnte
so sieht es atm aus:
Delphi-Quellcode:
type

  TFBase = class(TObject)
  public
    class function Get_irgendwas: String; virtual; abstract;
  end;

  TF1 = class(TFBase)
    class function Get_irgendwas: String; override;
  end;

  TF2 = class(TFBase)
    class function Get_irgendwas: String; override;
  end;
Delphi-Quellcode:
procedure TForm1.Button8Click(Sender: TObject);
var
  helper: TObject;
  z1: TF1;
  z2: TF2;
begin
  z1 := TF1.Create;
  z2 := TF2.Create;

  helper:= z1;

  FreeAndNil(z1);
  FreeAndNil(z2);

  Writeln((helper as TFBase).Get_irgendwas)
end;

{ TF2 }
class function TF2.Get_irgendwas: String;
begin
  result := 'tf2';
end;

{ TF1 }
class function TF1.Get_irgendwas: String;
begin
  result := 'tf1';
end;
jetzt noch eine frage: ich lasse die tobject-variable helper auf das objekt im speicher zeigen, auf das z1 zeigt. danach gebe ich z1 frei. dadurch müsste doch helper erstmal auf nix zeigen, aber auch nicht nil sein. dann caste ich helper als tfbase und er ruft die tf1.get_irgendwas methode auf.
da würde ich mich dafür interessieren, woher er noch weiß, dass es ein tf1-objekt ist und ob es eine schönere möglichkeit gibt, so ein objekt zu erzeugen ^^
  Mit Zitat antworten Zitat
 


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 07:48 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz