ich versteh das nicht, den String kann ich wunderbar zuweisen, aber nicht die Variable vom Typ TDateTime
Wieso ??? ist das ein Compilerbug oder mach ich was falsch ?

zusammenfalten · markieren

Delphi-Quellcode:

type

TIBZeit = record
private
  Value : TDateTime;
public
  class operator implicit(Zeit : TDateTime) : TIBZEit;
  class operator implicit(a : TIBZeit) : TDateTime;
  class operator implicit(a : TIBZEit) : String;

end;

implementation

{$R *.dfm}

class operator TIBZeit.implicit(Zeit : TDateTime) : TIBZeit;
begin
 result.value := Zeit;
end;

class operator TIBZeit.implicit(a : TIBZeit) : TDateTime;
begin
 result := a.Value;
end;

class operator TIBZeit.Implicit(a : TIBZeit) : String;
begin
  result := DateTimeToStr(a.value);
end;

//==============================================================================

procedure TForm1.Button1Click(Sender: TObject);
var d : TDateTime;
    Zeit : TIBZEit;
    st : String;
begin

  Zeit := now;
  st := Zeit;
  d := Zeit; /// geht nicht

end;

hmm .. weiß das denn wirklich niemand ? ist doch ein ziemlich wichtiges Grundproblem ?
Habe ich irgendeinen Compilerschalter übersehen ?
Versteh das nicht !

markieren

Delphi-Quellcode:

TIBZeit = record
private
  Value : TDateTime;
public
  class operator implicit(Zeit : TDateTime) : TIBZEit;
  class operator implicit(a : TIBZeit) : TDateTime;
  class operator implicit(a : TIBZEit) : String;

end;

Nun, ich kann jetz mal wieder total daneben liegen, aber
so wie ich das vor langer Zeit mal gelernt habe
können records nur statische Feldtypen arbeiten.
So in der Art:

markieren

Delphi-Quellcode:

TIBTeit = record
  value : TDateTime;
end;

Grüße
Klaus

Zitat:

Nun, ich kann jetz mal wieder total daneben liegen, aber
so wie ich das vor langer Zeit mal gelernt habe
können records nur statische Feldtypen arbeiten.

Da bist Du leider nicht mehr UpToDate .. Delphi2006 kann das ! das ist ja das coole !

Tja, cool oder verwirrend.
Da bleibe ich doch noch ein Weilchen bei Delphi6 ;o)

Grüße
Klaus

Zitat von Klaus01:

Nun, ich kann jetz mal wieder total daneben liegen, aber

Tust du.

Zitat von Klaus01:

so wie ich das vor langer Zeit mal gelernt habe
können records nur statische Feldtypen arbeiten.
So in der Art:

markieren

Delphi-Quellcode:

TIBTeit = record
  value : TDateTime;
end;

Grüße
Klaus

Seit D2006 (?) können Records prinzipiell auch Methoden etc. haben. Allerdings hagelt's bei mir immer interne Compilerfehler, sobald ich irgendwas Nichttriviales mache (z.B. http://qc.borland.com/wc/qcmain.aspx?d=26014).

Uli.

Ein wenig OT:

Da habe ich dann mal eine Frage wo ist
denn dann der prinzipielle Unterschied
zwischen records und Objects?

Ist das ganze dann eher mir einer Class in Java
zu vergleichen?

Grüße
Klaus

New-style records können nur statische Methoden haben, während objects weiterhin auch late-bound-Methoden haben können *glaub*

edit: Genauer: objects unterstützen Vererbung, records nicht

ähm... dass records funktionen haben können, wär mir neu, aber das sind doch hier operatoren! und das wurde ja extra eingeführt, dass man in recordtypen (afaik aber nicht in klassen sprich objekttypen) die operatoren benutzen kann.

warum das beispiel nicht funktioniert, kann ich aber ncihtr sagen.

Im übrigen ist "funktioniert nicht" keine befriedigende fehlermeldung

Nervt der COmpiler? kommen falsche ergbnisse raus? oder was?

Zitat von Dax:

New-style records können nur statische Methoden haben, während objects weiterhin auch late-bound-Methoden haben können *glaub*
edit: Genauer: objects unterstützen Vererbung, records nicht

Lol, virtuelle Methoden wären ohne die Möglichkeit zur Vererbung auch irgendwie witzlos, oder?