Forum: Object-Pascal / Delphi-Language
Delphi
by Sascha,
7. Jun 2009
naja nur beim ersten aufruf kommt das richtige ergebnis.. in der zeile danach nicht..
und unter Delphi 2008 läuft es ohne fehler.
Unter Delphi2005 bekomme ich den Fehler...
Forum: Object-Pascal / Delphi-Language
Delphi
by Sascha,
7. Jun 2009
var
Form1: TForm1;
aKnoten: array of TKnoten;
const
cBuchs: array of char = ('c', 'a', 'b', 'd');
iBuchs: array of int64 = (6, 5, 2, 3);
implementation
{$R *.dfm}
Forum: Object-Pascal / Delphi-Language
Delphi
by Sascha,
6. Jun 2009
PKnoten = ^TKnoten;
TKnoten = record // Record für Knoten
public
pSuper ,pBit0, pBit1: PKnoten;
bSuper: boolean;
iHaeufigkeit: int64;
cBuchstabe: char;
end;