Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2011.05.29;
Скачать: CL | DM;

Вниз

Напомните как можно (?) перечислить тип array of в параметр   Найти похожие ветки 

 
Гость   (2011-02-16 15:11) [0]

TColGrid = record
   sField: string;
   sNameC: string;
   Width: Integer;
 end;

function TfrmEditPrice.ToColGrid(sField, sNameC: string; Width: Integer): TColGrid;
begin
 Result.sField := sField;
 Result.sNameC := sNameC;
 Result.Width := Width;
end;

   procedure GridView(Col: array of TColGrid);

сейчас сделал
 GridView([
           ToColGrid( "REAL_NAME",    "НАИМЕНОВАНИЕ", 200),
           ToColGrid( "NORMAL_NAME",  "НОРМАЛЬ",      200),
           ToColGrid( "LCURRENCY",    "Ед.Изм.",      80),
           ToColGrid( "LMEASURE",     "Валюта",       80),
           ToColGrid( "LTYPEOFFER",   "ТипПредл",     80),
           ToColGrid( "ADDRESS",      "Адрес",        350)
         ]);

а без ToColGrid( вызвать GridView можно?


 
TColGrid   (2011-02-16 15:23) [1]

const
 ColGridValues: array[0..1] of TColGrid = (
   (sField: "REAL_NAME"; sNameC: "НАИМЕНОВАНИЕ"; Width: 200),
   (sField: "NORMAL_NAME"; sNameC: "НОРМАЛЬ"; Width: 200));
 // и т.д.
begin
 GridView(ColGridValues);


 
Гость   (2011-02-17 10:22) [2]

спасибо



Страницы: 1 вся ветка

Текущий архив: 2011.05.29;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.009 c
15-1297639800
Юрий
2011-02-14 02:30
2011.05.29
С днем рождения ! 14 февраля 2011 понедельник


15-1297167332
Копир
2011-02-08 15:15
2011.05.29
Страна дураков или?


2-1297969851
Criptonik
2011-02-17 22:10
2011.05.29
путь к директории с помощью opendialog


15-1297373374
Юрий
2011-02-11 00:29
2011.05.29
С днем рождения ! 11 февраля 2011 пятница


4-1248166128
dmitry_12_08_73
2009-07-21 12:48
2011.05.29
Почему-то не прокручивается окно, использую ScrollWindowEx