Nepodarilo sa mi k tomu nič nájsť.
Verzia 1
procedure...
const
coFlatNumber = 0;
var
NodeData: POwnerData;
begin
NodeData := Sender.GetNodeData(Node);
case Column of
coFlatNumber: CellText := IntToStr(NodeData.FlatNumber);
...
Verzia 2
implementation
const
coFlatNumber = 0;
...
procedure
var
NodeData: POwnerData;
begin
NodeData := Sender.GetNodeData(Node);
case Column of
coFlatNumber: CellText := IntToStr(NodeData.FlatNumber);
Mňa zaujíma výsledný kód po skompilovaní. A to či to nechá v pôvodnom stave, alebo to pretransfromuje do tejto podoby
Verzia 1
procedure...
var
NodeData: POwnerData;
begin
NodeData := Sender.GetNodeData(Node);
case Column of
0: CellText := IntToStr(NodeData.FlatNumber);
Pýtam sa to kvôli miestu, kde budem definovať opakujúce sa konštanty. Ak to kompilátor pretransformuje podľa ukážky, tak dám prednosť definovaniu konštát v mieste použitia. Áno, budem ich opakovať a zväčším počet riadkov jednotky. Ale mám to priamo na očiach a zmena nebude robiť problém.
Pri definovaní konštát v implementation môže byť ten zoznam nepríjemne dlhý. Pritom sa mi jednotlivé názvy môžu, aj sa, opakovať. V tom prípade musím použiť maďarsku notáciu a už sa v tom nevyznám.