Pointer: Zirkumflex Frage

[Blatt]

Also ist es wirklich nur sehr beschränkt implementiert und nicht so generisch wie in C?
uff, (beschäftige mich seit 2 Tagen mit Delphi) also manche Dinge stören mich echt erheblich an Object-Pascal und andere, sinnvolle Features vermisse ich sehr, bei denen ich nie gedacht hätte, dass so etwas in einem (halbwegs) aktuellen Delphi-Compiler fehlen würde..
Naja, danke für die Antworten

[Hawkeye219]

Hallo,

Zitat von alzaimar:

Ich meine, das die VErwendung in einer Variablendeklaration ein Zugeständnis ist, mehr nicht. Denn eigentlich sollte sowas auch in einer Parameterdeklaration möglich sein. Isses aber nicht.

Liegt es nicht eher daran, dass zwei Typen auch dann als unterschiedlich gelten, wenn sie die gleiche Struktur besitzen, aber unabhängig voneinander definiert wurden?

Delphi-Quellcode:

var
  a: ^Byte;
  b: ^Byte;
begin
  a := b;  // Fehler: inkompatible Typen
end;

Kompatible Typen bei der Verwendung von Prozedurparametern erreicht man, wenn für die Typvereinbarung ein Name eingeführt wird, der auf beiden Seiten - beim Aufruf und bei der aufgerufenen Routine - verwendet wird.

Gruß Hawkeye

[p80286]

Was die Typdeklaration angeht, kann ich mich erinnern, daß zuerst alle "Namen" gesammelt werden, und dann erst diesen Namen die entsprechenden Typen zugewiesen werden.
also ungefähr so:

Delphi-Quellcode:

Type 
 prec   =^rectyp;
 rectyp = record..........end;

 rec    =^record..........end;
 rectyp = record..........end;

Wenn man es mit dem zweiten Konstrukt versucht, bekommt man sofort die Meldung "Bezeicher erwartet" um die Ohren gehauen.
Was eigentlich hinreichend genau ist, ein Pointer weist immer auf einen beliebigen Typen hin.
Die sog. Typisierung ist eigentlich nur ein Schmankerl um ein paar Fehler zu vermeiden.

Für ein funktionierendes Programm ist so etwas durchaus ausreichend:

Delphi-Quellcode:

Type
  TListenelement = record
                     Daten : irgendwas;
                     next  : pointer;
                     last  : pointer;
                   end;
var
  ErstesElement,
  LetztesElement,
  AktuellesElement : pointer;

aber so ist es etwas einfacher:

Delphi-Quellcode:

Type
  PListenelement = ^TListenelement;
  TListenelement = record
                     Daten : irgendwas;
                     next  : PListenelement;
                     last  : PListenelement;
                   end;
var
  ErstesElement,
  LetztesElement,
  AktuellesElement : PListenelement;

Edith:
und dereferenzieren kann ich immer noch mit allen möglichen Typen!

Gruß
K-H