Registriert seit: 10. Nov 2005
216 Beiträge
RAD-Studio 2009 Pro
|
Re: Zeiger auf array
13. Mai 2006, 00:06
was spricht gegen dynamische arrays? damit würde es gehen!
Delphi-Quellcode:
type
TColorArray = array of TColor;
PColorArray = ^TColorArray;
var
Palette4: TColorArray;
Palette8: TColorArray;
Palette: PColorArray;
procedure TForm1.FormCreate(Sender: TObject);
begin
setlength(Palette4, 16);
setlength(Palette8, 256);
Palette := @Palette4;
end;
|