[Delphi] const array+record

0

Postawię [browar] jak ktoś mi da satysfakcjonującą odpowiedź.
Mam zadeklarowane typy:
type TEntry = record
LexPtr: string;
Token: Char;
end;
TSymTable = array of TEntry;

i chcę zadeklarować stałą typu:
const
Keywords: TSymTable = ??

I pytanie jak przyporządkować od razy wartości?

Podpowiedź (żebyście wiele nie szukali w pomocy):
Jeżeli mam przyporządkować wartości do tablicy:
type Tablica = array [0..3] of Char;
to się robi tak:
const
Tab: Tablica = ['0', '1', '2', '3'];
lub tak
Tab: Tablica = '0123';
Jeżeli chcĘ przyporządkować wartości do rekordu:
type TPoint = record
X, Y: Single;
end;
to się robi tak:
Punkt: TPoint = (X: 2.3; Y: 4.0);

[browar] czeka...

--
Jest jeszcze jeden błąd ... :)
--------Oficjalny kanał----------
Service for programmers w IRC: #4programmers, warszawa.ircnet.pl (POLNet)

0

TSymTable jest tablica dynamiczna, takiej tablicy chyba nie mozna przypisac stalej wartosci.
Zaznaczam ze nie jestem pewny tej odpowiedzi... :

0

TSymTable jest tablica dynamiczna, takiej tablicy chyba nie mozna przypisac stalej wartosci.

Jesli jednak zechcesz uzyc statycznej, to:
type TEntry = record
LexPtr: string;
Token: Char;
end;
TSymTable = array [0..1] of TEntry;
const
Keywords: TSymTable =((LexPtr:'ala';Token:'a'),(LexPtr:'ola';Token:'x'));

--
Pawel {Delphi 6 Personal}

Po pierwsze: naciśnij F1

1 użytkowników online, w tym zalogowanych: 0, gości: 1