Thema: Delphi Zeiger auf array

Einzelnen Beitrag anzeigen

nat

Registriert seit: 10. Nov 2005
216 Beiträge
 
RAD-Studio 2009 Pro
 
#4

Re: Zeiger auf array

  Alt 12. Mai 2006, 23: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;
  Mit Zitat antworten Zitat