Thema: Delphi operator is und as

Einzelnen Beitrag anzeigen

DelphiDeveloper

Registriert seit: 9. Apr 2003
Ort: Köln
256 Beiträge
 
Delphi XE2 Enterprise
 
#1

operator is und as

  Alt 17. Nov 2003, 21:45
ich habe folgendes Problem

FormA mit Property Blabla
FormB mit Property Blabla

Beide Formulare rufen FormC auf, in der das property Blabla gesetzt wird

mit dem "is" und "as" Operator bzw. "self.owner" kann ich zwar festellen welchem formular
ich das Property fülle aber ich suche nach einer eleganteren Lösung als die folgende:

in FormC:
if self.owner is TFormA then
with self.owner as TFormA do begin
BlaBla := irgendwas;
...

end;

if self.owner is TFormB then
with self.owner as TFormB do begin
BlaBla := irgendwas;
...

end;

Kennt jemand eine elegantere Möglichkeit?

mfg
DelphiDeveloper
  Mit Zitat antworten Zitat