Einzelnen Beitrag anzeigen

Redeemer

Registriert seit: 19. Jan 2009
Ort: Kirchlinteln (LK Verden)
1.049 Beiträge
 
Delphi 2009 Professional
 
#3

AW: Variable für const array

  Alt 1. Okt 2017, 23:12
Ich habe keine Ahnung, wo das Problem sein soll, denn ich verwende derzeit konstante Arrays eines Records in meinem SVG-Interpreter, da für einen XPM-Interpreter auch X11-Farben benötigt werden:
Delphi-Quellcode:
type
  TColorName = record
    Color: TColor;
    Name: string;
  end;

function HTMLToColor(HTML: string; out Color: TColor; const ColorNames: array of TColorName): Boolean;

const
  CSSColors: array[0..146] of TColorName = ((Color: $00FFF8F0; Name: 'aliceblue'),
  (* here be 145 dragons *)
                                            (Color: $0032CD9A; Name: 'yellowgreen'));

implementation

begin
  HTMLToColor('rebeccapurple', tempcolor, CSSColors); // funktioniert einwandfrei
end;
Wenn's gar nicht anders geht: packed array s mit Pointern verwenden wie Windows das macht. Aber das sollte doch eigentlich ganz normal gehen.
Janni
2005 PE, 2009 PA, XE2 PA
  Mit Zitat antworten Zitat