Pointer zu Typen ! Warum ?

[mr_emre_d]

Ich hab schon so in einigen Units von fortgeschrittenen Programmieren gesehen,
dass sie Pointer zu jedem Typ vereinbaren

Hmm aber warum ?

Code:

type
  TWochen = ( montag, ... , sonntag );
  PWochen = ^TWochen;  // so ca.

[bluesbear]

Das ist mehr so aus Gewohnheit, für denFall, daß man vielleicht mal sonen Pointer gebrauchen könnte. Es ist nichts, was man unbedingt machen muss.

[mr_emre_d]

hmmm,

ein fall wäre ? :angel:

Danke schon mal im voraus

[mkinzler]

Binärbaum, verkettete Liste, ...

[Zacherl]

Teilweise muss man auch einen Record deklarieren und danach ein Array of TMyRecord. Wenn aus irgendwelchen Gründen TRecordArray ein Feld des Records selbst darstellen soll, hat man ein Problem, da der Compiler die Größe von TMyRecord nicht kennt.
In diesem Falle kann man zuerst das Array deklarieren, welches man aber von Typ PMyRecord festlegt. Der Pointer hat eine feste Größe von 4 Bytes.

[Apollonius]

Ehrlich gesagt finde ich es bei Aufzählungen reichlich sinnlos, einen entsprechenden Zeiger zu definieren.

[Dax]

Zitat:

Zitat von Zacherl

Wenn aus irgendwelchen Gründen TRecordArray ein Feld des Records selbst darstellen soll, hat man ein Problem, da der Compiler die Größe von TMyRecord nicht kennt.

Das ist falsch: wenn ein Record TA ein Feld vom Typ TA enthält, wird der Record unendlich gross.

[mr_emre_d]

hmmmm, verstehe .....
...
...
...
... nur Bahnhof ^^ :wall: :wall:

kann mir das einer gründlicher erklären ?

wäre sehr nett

MfG

[bluesbear]

Das überlasse ich mkinzler :mrgreen:

[mkinzler]

Was willst du genauer Wissen?

Zitat:

Das überlasse ich mkinzler Mr. Green

So einfach kannst du dich nicht aus der Verantwortung schleichen :stupid:

[bluesbear]

Ach menno - du hast doch fast immer eine Antwort auf alles. Außerdem hattest du die Antwort auf die Frage hier ja schon genannt. :zwinker:

[BUG]

Achtung, ich weiß nicht wie das Folgende mit Delphi > Delphi 3 aussieht :mrgreen:

Delphi-Quellcode:

procedure test(a: ^byte);
begin
end;

Kann ich ich nicht kompilieren,

Delphi-Quellcode:

type PByte = ^Byte;
// ...
procedure test(a: PByte);
begin
end;

geht.

MfG,
Bug

[mkinzler]

Würde man in Delphi auch so lösen:

Delphi-Quellcode:

procedure test(var a: Byte);

[nicodex]

Zitat:

Zitat von mkinzler

Würde man in Delphi auch so lösen:

Delphi-Quellcode:

procedure test(var a: Byte);

Nicht, wenn es sich um einen 'optionalen' Parameter handelt (TFoo(nil^) geht zwar auch, aber 'schön' ist was anderes).

[SubData]

Nehmen wir an, du möchtest einer Prozedur ein Record übergeben, welches selbst einen Verweis auf die Prozedur hat.

Delphi-Quellcode:

  PTFormatProcedure = ^TFormatProcedure;

  TFormatRecordEntry  = record
    iProc   : Byte;
    pFunc   : PTFormatProcedure;
  end;

  TFormatProcedure  = function(const re: TFormatRecordEntry; const xSet: TDataSet): String;

Du könntest im Record selbst kein Feld auf TFormatProcedure definieren,
da der Compiler an dieser Stelle die Prozedur noch nicht kennt.
Andersrum kannst du das Record nicht danach definieren, da es
ein Parameter für die Prozedur ist. Mit einem Pointer wäre dies machbar :)